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Prólogo 



Durante muchos años la informática ha sido una actividad reseñada a pro- 
fesionales trrniramrntr muy < ualifícados, a los que muchas veces se considera- 
ba -semimagos- |k>i ser capaces <le -convencer" a una máquina para que müizanr 
carcas que hasta cniom « s se había pensado sólo podrían ser resuellas por el hom 

rebros electrónicos-. 

Ordenadores < orno su < \munodori' t>4 han colalxjrado intensamente a aca- 
tar COTI este mkd al ofrecer, junto con una gran capacidad, un precio muy ase- 
quible que pone a la mano de cualquiera la posibilidad de dar el «pequeño gran 
salto- sin más que interesarse por el tema. 

Memos cm rito este libro para ayudarles «desde el principio-*, suponiendo que 
qut/a m".i mi primer tontaiio con el onl<'iiador 

l'.l pi imei i apímt<i le será de gran utilidad para conocer cómo hacer fundo- 
ii.ii .1 mi máquina r iicuntrará sentido a cadfl Conexión ) lobrt todo podrá ftmi 
llamarte con el teclado, herramienta indispensable para comunicarse con éxito 
ton rl ordenador. 

El principal objetivo del libro es que domine el lenguaje BASIC con el que 
su Gommodore f>4 viene equipado. Cada nueva instrucción será menos nueva 
liara usted, porque según avance irá sintiendo la necesidad de pmlcr hacer algo 
más. Así. cada vez que le presentemos otra palabra BASIC sentirá que va intuía 
su existencia. 

Cada uno de los programas que le presentamos le aportará alguna idea nue- 
va que le servirá para resolver los problemas que tiene en su mente. Intente ha- 
cerlos por su rúenla, no se limite a teclearlos porque, aunque le parezca que 
lo va entendiendo todo con facilidad, el gran paso lo dan» en el momento en 
que diseñe el primer programa por su cuenta. I.e llenará de satisfacción y le 
animará a seguir. Consiéntanos un consejo final que posiblemente haya recibi- 
do otras veces, pero que no por ello resulta intrascendente: No se quede nunca 
con la duda -que ocurriría si hiciese...» Hágalo, no le importe equivocarse, apren- 
derá de sus errores. Tenga presente que. a diferencia de ' 
con oirás materia*, a programar se 



1 Introducción 



Probablemente, cuando abra este libro ya habrá desempaquetado y comen- 
zado a instalar su Oommodore til. No se precipite. Lo primero que hemos de 
un escondite de trabajo cómodo v bien iluminado. Lo ideal es 
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una mesa plana dé unos 70/75 cm de alto por 70/80 cni de tondo y tan ancho 
como le sea posible. Pronto empezará a acumular periféricos, libros, apuntes, 
cassettes, disquetcs. ele. y no fe parecerá exagerada esta precaución. 

DESEMBALADO 

Coloque el contenido del paquete encima de la mesa y empiece a examinarlo, 
'leiicmos: 

I FJ ordenador C M. 

2. Una fuente de alimentación. 

:J. Un cable para conectar el C-í>4 con el televisor. 




r.g l I Kqu.,.. hWW del C.nmodore 0» 



También halará adquirido un dispositivo de almacenamiento, bien la Data- 
sserte o bien la unidad de disquetcs y, si se ha sentido espléndido en su inversión 
inicial puede que además disponga de una impresora y de un modem. A lo 
largo de este libro supondremos que la configuración de que dispone está for- 
mada por la configuración básica y la Datasscttc. Si acaso dispone de otros peri- 
féricos, acuda al apéndice -Otros periféricos", que se ocupa de exponerle en forma 
detallada su utilización. 

Tras desempaquetar el Commodure. lo que más salla a la vista es lo vario- 
pinto de su teclado, lleno de letras, dígitos, caracteres especiales, abreviaturas 
de palabras, palabras completas, ele. Peni, como lo primero que necesitamos 
(■•• ponerlo en fum ionamiento, vamos a examinar detenidamente su sistema de 
conexiones. F.sias están simadas en el lateral derecho y en la parte posterior del 
ordenador véanse Figs. 1.2 y l t 
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1 Concern parn |urp« 1 lOame IVrt I) 
i Conexión para jWfH 1 (Carne IVrl 2). 
S. Iniernipiitr Av jliim-m.u ión 
\. C*nw\um «Ir .ilmtrnt.it ni» 
S. Conexión pan ufiu. )n«. 

6, ¡Scleuor de (anal 
7 Conexión pan televisión, 
fl Conexión aiidio/\iitri) (Video fon). 
9. Conexión MÍC t?Wial r\»rt( 
10. Conexión ...... t fc l-l U lc 

11 Conexión paralelo de ututrin | rWM Um ron) 



CONEXIONES 

Vamos a hablar en primer lugar de las conexiones 3. 4, 7 y 10. que son las 
que necesitamos para nuestra configuración básica (suponiendo que ha decidi- 
do utilizar su televisión). 

3. Interruptor de alimentación. ON/OFF (conexión/desconexión). Una vez 
conectado el sistema, utilizaremos este interruptor para encender y apagar la 




unidad central. Recuerde siempre que al apagar la i 
nitivarncnlc lodo lo que haya estado trabajando, a 
do en la Daias-seltc O en la unidad de discos. 

Recuerde lanibién que al desconectar la unidad central la fuente de alimen- 
tación seguirá funcionando, a menos que desconecte el enchufe de la red- Es 
importante recordar ettO, pues frecuentemente e) dispositivo que más proble- 
mas ocasiona es la fuente de alimentación. ¡Candela! 

4. Conexión de alimentación. I fuente de alunen! ación liene dos cables: uno 
termina en un enchute normal tiara conectarlo a la red v el otro termina en 
una clavija típica cl<- siete pins. pero «*n este caso sólo tiene cuatro. No se pre- 
ocupe, no falta ninguna, viene asi. Para desconectar el ordenador, lo adecuado 
es utilizar el interrupior ON/OFK. del que hablamos en el punto anterior. No 
se acostumbre a sacar y meter la clavija de conexión de alimentación, pues «e 
acabará deteriorando, tomando holgura, y esto traerá consigo fallos intermiten- 
Ies en la alimentación, que arruinarán sus ganas de trabajar con el ordenador. 

7 Conexión para la televisión. En el paqueie di- su Commodore viene un 
Ukble de anlena para ennee tarlo con su a|uniio de televisión. Si la TV es anti- 
gua puede que necesite un adaptador pañí conectar con el enchute de UHE 
En la ferretería más próxima a su casa encontrará t-l material necesario, y es 
muy sencillo de tonstruii y barato. En caso de que no necesite adaptador, co- 
nrcir el cuchille (del cable de antena) que contiene la clavija más larga a su 
C lotiiniodorc v el otro al televisor. 

10. Conexión pata Dataaette. Ea Datassette viene provista de un solo enchu- 
fe, t on forma plana, que va conectado al Commodorc. No se preocupe porque 
no tenga (Uro enchute pata conectarlo a la red, su Commodore se encargará 
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de suministrarle la energía pan que funcione. Observe el enchufe de la Dalas- 
selle y verá una pequeña lámina de p Lis tico que divide la conexión en dos zo- 
nas. Al enchufar la Datassette a su ordenador líjese en que coincida esta lámina 
de plástico con la ranura que presenta la tarjeta de conexión del Commodore. 



Quedan por mencionar diversas conexiones. Sin embargo, si su configu- 
ración es la básica (ordenador, TV, Datassette) puede encontrar más útil 
saltar, de momento, el resto de este apartado y pasar al siguiente. Siem- 
pre tendrá tiempo para volver a leerlo. 



I y 2. Conexiones para juegos. Aquí es donde tendrá que conectar los diversos 
contrnladores de juegos, tales como los jvysttcks y los paddles, así romo los lapices 
Ópticos v otros dispositivos especiales. Ad em ás, algunos programas, como ilu- 
dida de seguridad, se venden con una pequeña caja negra, llamada «llave;., que 
es preciso conectar a uno de estos enchufes para que el programa luncione. 

5. Conexwn para cartuchos, Poco a poco irá encontrando múltiples usos para 
esta conexión. Además de servir para utilizar los programas y juegos que vie- 
nen en cartuchos, existen adaptadores que nos permiten utilizar unidades de 
disquetcs distintas de las de Commodore y muchas cosas más. 

5. Selector de canal. No se preocupe, en general no tendrá que manipular 
este dispositivo. Su finalidad es la de ser utilizado en caso de que no pueda va- 
riar la sintonización de los canales de su televisor. En este caso tendrá que va- 
riar el canal de emisión de su Commodore (mediante el lomillo que ve en la 
ranura) hasta que éste coincida con algún canal de su televisor. Si, como es ha- 
bitual, puede variar la sintonización de los canales de su televisor, no toque este 
dispositivo. 

8. Conexión audio/videa Si tiene un monitor monocromático o uno de color 
es aquí donde hay que conectarlo. Kn este conector puede introducir también 
un enchufe para enviar el sonido a un amplificador y, si es hábil con la electró- 
nica, puede construir un cable que a partir de esta loma envíe la imagen a un 
monitor v el sonido a un amplificador. A través de esta conexión el Commodore 
puede también recibir sonido de una fuente externa, tal como un cassette, un 
micrófono etc. 

9. Conexión en sene (Serial Pbrt) Aquí es donde ha de enchutar el dispositivo 
de disqueics 1541, la impresora 1525 y cualquier otro dispositivo que utilice una 
configuración de entrada/salida en serie. F.n el apéndice -Otros periféricas» en- 
contrará las instrucciones para conectar la unidad de disquetes y la impresora. 

II. (Anexión de usuario También llamada conexión en paralela Aquí es donde 
el usuario podrá aplicar la mayoría de sus ideas. F.n principio podemos conectar 
rl modem, pero si usted es experimenta dor encontrará que ésta es la conexión 
a utilizar para sus experiencias caseras. 



INSTALACION 

Bien, vamos a poner en funcionamiento nuestro Commodore. Lina vez ele- 
gida la mesa y una silla confortable (Iras varias horas de trabajo, su espalda agra- 
decerá esta recomendación), empecemos jnir colocar el televisor. Coloque después 
el Commodore y la Datassette y comience con las conexiones. Kn primer lugar 
conecte el cable que va de la fuente de alimentación al C-64 (no enchufe toda- 
vía el cable a la redi, después introduzca la conexión de la Datassette en el C-64 
y coloque el cable uc anlena que va desde el C-64 al televisor. Ya hemos realiza- 
do todas las conexiones internas. Si al intentar alguna conexión observa cierta re- 
sistencia no trate de introducirlo a la tuerza, sólo conseguirá estropear la conexión. 
Compruebe en las figuras 1.2 y 1.3 si está utilizando el conector adecuado y, 
si rs así. mire si lo está haciendo correctamente. En todo caso, en lugar de em- 
pujar con fuerza, siempre es aconsejable intentarlo varias veces con suavidad. 

Ahora sólo quedan por realizar las conexiones a la red (habrá tenido la pre- 
caución de que cerca de la mesa hubiera un enchufe, ¿no?). En principio nece- 
sitamos realizar sólo dos conexiones: la del televisor y la de la fuente de 
alimentación del Commodore (el Datassette se alimenta a través del C-64), pe- 
ro después iremos necesitando enchufes para la unidad de disquetcs, la impre- 
sora.... así que es aconsejable estar bien provisto de enchufes múltiples. 




h.R. LA lawlacltedef C44. 



Una vez realizadas tas conexione* externas (a la red), pulse el interruptor de 
alimentación del C-64 y oí interruptor del televisor, para entender ambos, y es- 
pere unos segundos para ver el mensaje del Commodore en la pantalla. Es difí- 
c il que obtenga este mensaje la primera ve 2 míe lo intente, puede que tenga 
suerte y lo ó meo que haya que hacer sea ajusta r los t (miróles «Ir brillo y contras- 
te dr su tele\ isor, pera la normal ea que tenga que dedícu i ierto tiempo a la 

sintonización de su televisor. ¡Ay qué suerte los que disjxmeii de mandos de sin 
tonizarión automática! Pero si éste no es el caso, paciencia. Si su televisor es 




Fie. 1.6. Saludo del Commodore. 



sólo de dos canales, VHF y ÜHF, tendrá que utilizar el canal de UHF y girax 
la ruedecilla de sintonización hasta visualizar el mensaje. Si su aparato dispone 
de diversos canales de sintonización, 4, 6, 8, etc. elija uno de los últimos canales 
(¿no interfiera con el canal de vídeo que utilice su familia!) para dejarlo cons- 
tantemente dedicado al C-64. Dedique tiempo a la sintonización, pues el can- 
sancio posterior de sus ojos dependerá de ello. Cuando liaya logrado una buena 
sintonización y se encuentre disfrutando de las tonalidades azules en las que 
Commodore nos transmite sus mensajes, no se resista, teclee alegremente y sin 
preocupación, experimente, el Commodore no se estropeará por ello. 

EL TECLADO 

Para comunicar con el ordenador hemos de dominar dos puntos: el manejo 
del teclado v el lenguaje con el que podemos hablarle a la máquina. Esto es, 
tenemos que aprender un lenguaje que el ordenador pueda «entender», y utili- 
aii el teclado para escribirlo correctamente; corregir aquello en que nos haya- 
mos equivocado, etc. El lenguaje que viene incorporado con el C-64 es el BASIC, 
v de él nos ocuparemos a lo largo del libro. Vamos ahora a iniciarnos en el uso 
del teclado 

I.o primero que olísrrvamos es una gran variedad de teclas: unas contienen 
número* y símbolos; otras letras, y caracteres; otras tienen unas tialabras en in- 
glés; otras, una abreviatura, etc. ¡No se asuste! No es lan difícil. En esta sección 
vamos a introducir el manejo básico del teclado, de modo que en cualquier mo- 
mento le pueda servir de referencia. Sin embargo, algunas ,,c cuartones específi- 
ca* las veremos cuando surja la necesidad de utilizarlas. En este momento lo 
importante es practicar, así que anímese y teclee codo lo que se le ocurra con 
• ada apartado. 

Cursor 

Recibe este nombre el rectanguhto azul claro que aparece parpadeando en 
la pantalla. Cuando conectamos el ordenador, el cursor aparece situado debajo 
de la R de RF.ADY (ver Kig. 1.6). El cursor indica el lugar de la pantalla en 
que aparecerá el siguiente caráccer que tecleemos. Según vamos escribiendo, el 
cursor se desplaza hacia la derecha. Cuando llega al final de una línea, el cursor 
salta al principio de la línea siguiente (En una línea caben 40 caracteres.) 

Teclas SHIFT, SHIFT/LOCK. C= y CTRL 

La utilización de las teclas SHIFT (hay dos: una a la izquierda y otra a la 
derecha). C- y CTRL es parecida a la de la tecla de mayúsculas de una má- 
quina de escribir, esto es, pulsando una de ellas, sin pulsar ninguna otra tecla, 
no tiene efecto alguno. Para conseguir ciertas acciones tendremos que pulsar 
una de estas teclas y. mientras la mantenemos pulsada, presionar la tecla desea- 
da. Esto lo iremos viendo a medida que introduzcamos las acciones posibles. 

Cuando encendemos la máquina y comenzamos a pulsar las teclas de letra, 
estas aparecen como mayúsculas en la pantalla. A esto lo llamaremos «modalidad 
mayúsculas». Si pulsa una sola vez, y al mismo tiempo, las teclas C= y SHIFT, 
verá que todas las letras que aparecían en la pantalla pasan inmediatamente de 
mayúsculas a minúsculas. Ahora, al pulsar teclas de letra, estas aparecerán en 



minúsculas. A esto lo llamaremos -modalidad minúsculas». Para volver a ¡tasar de 
«modalidad minúsculas» a «modalidad mayúsculas", basta con reperir la acción 
de pulsar a la vez teclas C= y SHIfT Pulse diversas veces estas dos teclas y 
entreténgase obser\'ando los cambios en su pantalla. 

La léela SHIFT LOOK sirvo, al igual que en la máquina de escribir. |iara 
mantener la acción de la tecla SHfFT sin necesidad de tener que calar pulsan- 
do constantemente esta última. 



Teclas CRSR í/i, CRSR 

Estas reciben el nombre de léelas de desplazamiento del cursor, v, como su 
nombre indica, sirven para situar el cursor en la posición que deseemos. 

Pulse la tecla CRSR y verá que el cursor se desplaza haría la derecha. 
Estas teclas son autorrepetitivas, es decir, si las mantiene pulsadas se repite la 
acción de la tecla. Cuando el cursor llegue al margen derecho, saltará al mar- 
gen izquierdo de la línea siguiente. 

Ahora mantenga pulsadas las teclas SHIFT y CRSR *-/-* y obtendrá el 
desplazamiento inverso del cursor, de derecha a izquierda. Cuando el cursor 
llegue al margen izquierdo, saltará al mugen derecho de la línea superior. 

Con la tecla CRSR Vi conseguiremos el desplazamiento hacia arriba y ha- 
cia abajo del cursor, según si, al mismo tiempo, mantiene pulsada o no la tecla 
SHIFT, Esto es, con CRSR Vi llevamos el cursor hacia abajo, mientras que 
con SHIFT y CRSR Vi desplazarnos el cursor hacia arriba. Observe que si 
llevamos el cursor al tope superior de la pantalla y continuamos rnanieniendu 
pulsadas SHIFT y CRSRT/I, lo único que conseguiremos es que el parpadeo 
del cursor sea muy rápido, pero no afectará en nada a! contenido de la pantalla. 
Sin embargo, si desplazamos el cursor al margen interior de la pantalla y coiUi- 
nuamos manteniendo pulsada la t«« la CRSR I. 'i. el cursor no se moverá de esta 
posición, pero el contenido de la pantalla se irá desplazando hacia arriba línea 
a línea e irá desapareciendo por el margen superior 

Ahora ya sabemos colocar el cursor en el lugar de la pantalla que dcM'cmm 
para poder escribir allí lo que queramos. Observe que el paso del cursor por 
alguna línea que ya esté escrita no afecta en nada al contenido de la línea 

Tecla CLR/HOME 

Una vez que hemos ensuciado suficientemente la pantalla, es necesario de> 
poner de algún disposiiivo que nos permita limpiaría de una forma cómoda. 
Quizá en este momento no aprecie mucho su utilidad, pero aprenda su funcio- 
namiento con la seguridad de que será muy útil para realizar trabajos con una 
buena presentación. 

Si pulsa la tecla CLR/HOME, el cursor se coloca en la esquina superior 
izquierda, pero no se borra nada de lo que tengamos escrito en la pantalla. Pul- 
sando a la vez las teclas SHIFT y CLR/HOME se liorra la pantalla y el cursor 
se sitúa en la esquina superior izquierda. 



Tecla INST/DEL 

Uno de los hechos a los que tendremos que acostumbrarnos, en nuestra re- 
es que en muchas ocasiones nos equivocaremos v- por 



tanto, tendremos que apcendei de qué medios disponemos para correi'ir nues- 
tros errares. 

DF.I. es la abreviatura de DKI.ETE (BORRAR», y al pulsa: «ta tecla bo- 
rraremos rl rarái ler que esté situado inmediatamente a la i/.qnirrda del cursor. 
Para eliminar una letra o palabra, dentro de un texto que ya hayamos escruo. 
tendremos que loloear el cursor, mediante las teclas CRSR. encima del carác- 
ter que esté inmediatamente a la derecha del que. o de los que» queremos bo- 
irar Una vez en esla siluacióu, pulse la tecla OKI . lanías \rt es como '..mulleres 
desee eliminar ¡Cuidado' I .a tecla OEL es auiorrepetniva y. por tamo, si la man- 
tenernos pulsacia puede que borremos mucho más de lo necesario. 

Su|>onga. paia u practicando, que tras borrai la pan talla (SI HIT y CLR.- HO- 
ME) hemos colocado el cursor en medio de ésia. mediante ¡as teclas CRSR. 
> tecleamos La frase: 

MI BUEN AMIGO PI.FI-. 

Al lina) tendremos el cursor rras la ultima E de l'F.PK. IVro tras escribir );i 
fíate |H*nsainos que sería prcierible borrar la palabra BL KN Para ello manten- 
dríamos pulsada la tet la SHIFT > pulsaríamos la tecla CRSR «— ' — ► hasta co- 
cear el cunor encima de la letra A. Ahora tendremos que pulsar la let la ÜEI. 
cinco mes (cuatro por la palabra BUEN y una por el espacio que hay entre 
RITA \ AMIGO». Ouservara que la acuón de borrar se realiza de derecha 
a izquierda y que los caracteres situados a la derecha del cursor se irán despla- 
zando hacia la izquierda según vayamos pulsando la tecla DEL, esto es. no que- 
da ningún espacio en blanco por medio Tras esro, si quiere volver a la posición 
mu ial. pulse la tecla CRSR«— .'— ♦ . para colocarle del ni» de Ifi palabra PEPE. 

INS'I representa a la palabra INSERT < INSERTAR ) v la utilizaremos para 
insertar laumeres. que se nos hayan nhridauOi entre oí ios rararrerr*. que vn ten- 
gainatí escritos. Volviendo con el ejemplo anterior, tías borrar la palabra BUEN, 
en la pantalla tenemos la frase: 

MI AMIGO PEPE 

Y ahora pensamos que en realidad sí queríamos poner la palabra BUEN y de- 
seamos volver a colocaría en su sitio. Utilice las teclas CRSR para volver a colo- 
car el cursor sobre la letra A. Mantenga pulsada la leda SH I r T v pulse la tecla 
INST tantas veres como caracteres desee insertar, rn nuestro caso cinco (cuatro 
de BUEN v un espacio en blanco que necesitaremos entre BUEN y AMIGO). 
Note que el cursor no se mueve de su >Íiio. son los caracteres que hay a su dere- 
( ha |i»s que *e van desplazando, dejando siiio para los caracteres que vamos a 
introducir, léclec ahora la palabra BUEN y pulse una sola vez la barra espacia- 
dora (e*a tecla larua lituana en el borde interior del teclado) para conseguir el 
espacio necesario. En este momento el cursor eslará sobre la letra A v podemos 
utilizar la teda CRSR*-/-* CRSR «—.'—> para situarlo al final cíe la línea 
">i tras introducir la palabra BUEN, en lugar de pulsar la tecla espadadora, hu- 
biéramos pulsado la tecla, para desplazar el cursor haría la derecha, entre, las 
palabras BUEN y AMIGO aparecerá un carácter extraño, de la forma | J¡ . 
m lugar del espacio en blanco deseado. Esto se debe a que a! haber insertado 
el espack) para cinco caracteres el ordenador estaba esperando aún otro carác- 
ter, que muy bien puede ser el espacio en blanco que se obtiene con la barra 
espadadora. Al pulsar la recia CRSR en lugar del espaciador, el ordena- 

dor lomará el carácter 1 31- que es como representa la arción del desplazamiento 
hacia la derecha. Tero, ¡cuidado con el espaciador' Si una vez colocado sobre 



la letra A continúa pulsando el espaciador, en lugar de la tecla de desplazamiento, 
borrará todas las letras por las que pase. No trate todavía de entender bien esto, 
pues ya lo iremos viendo a medida que avancemos dentro del mundo de nues- 
tro ordenador. De momento, lo más importante es que practique las acciones 
DI\L e INS I', hasta llegar a dominarlas. Pruebe a borrar e introducir diversas 
veces las |>alabnis BUEN y AMIGO, o a crear y corregir oíros textos que se 
le vayan ocurriendo. Cuando desee limpiar la pantalla utilice las teclas SHIFT 
y CI.R. 

* 

Impresión de caracteres 

Ya hemos utilizado algunos de los caracteres que podemos obtener de nues- 
tro Commodore, Vamos ahora a revisar, de una forma metódica, la amplia ga- 
ma de caracteres que podemos utilizar 



TECLAS DE LETRAS 

■•Modalidad mayúsculas»: Recuerde que para pasar de -Modalidad mayúscu 
las» a «Modalidad minúsculas" ha de pulsar una sola ve/ v al misino tiempo 
las teclas C= y SHIFT, 

— Pulsando solamente las teclas de letra obtendremos la versión en ma- 
yúsculas de la letra correspondiente. 

— I 'trisando SHIFT y la tecla de letra obtendremos, de los dos canu ierr> 
gráficos situados en la laida de la tecla, el de la derecha. 

— Pulsando C» y la tecla de letra obtendremos el carácter gráfico de la 
izquierda. 

•'Modalidad minúsculas-: 

— Pulsando directamente una tecla conseguimos la versión minúsculas de 
la letra. 

— Pulsando SIIIKl y la tecla aparecerá la versión mavúscula de la letra 

— El resultado de pulsar simultáneamente C= y la tecla de letra es el mis- 
mo que en -Modalidad mayúsculas». 

Observe que si tras escribir diversos caracteres en cierta modalidad pasa a 
la otra, los caracteres cambiaran a los que correspondan a dicha modalidad. 

Teclas con los símbolos +. -, £, @, 

«Modalidad mayúsculas»: 

— Pulsando sólo la tecla obtenemos el símbolo. 

— Pulsando al mismo tiempo C= aparecerá el carácter gráfico de la iz- 
quierda. 

■•Modalidad minúsculas": Los resultados son los mismos que en la anterior mo- 
dalidad, exceptuando que en «Modalidad minúsculas» los caracteres y £^ 
de l as te clas £ y " se convierten en rayados diagonales del cuadradiio, y el carác- 
ter □ de la tecla @ se convierte en el carácter £ZI 



Tecla r/w 



■'Modalidad mayúsculas»: 

— Pulsando di rectamente la tecla obtenemos el símbolo. 

— Si al mismo tiempo pulsamos SHIFT o Chaparree la letra ». 

-Modalidad minúsculas» La única diferencia es que el símbolo * pasa a ser 
un reticulado de la posición de carácter. 



Teclas = y - 

— Siempre producen el síml»»l<» impreso encima de la leda. 

Tecles ! . ^.¿UG 
-Mo/Ialidad mayúsculas-: 

— Pulsando sólo la tecla obtenemos el símbolo interior. 

— Si además pulsamos SI 111 I <> C= apárete el símbolo superior. 

-Modalidad minúsculas.- Funciona igual que la -Modalidad mayúsculas-. 



TECLAS NUMERICAS 



De estas teclas vamos a ver sólo dos posibilidades. La acción conjunta de 
C- ó CTRL con estas teclas la estudiaremos en el apartado siguiente; -Obten 
(lóll de colores-, 

-Modalidad mayúsculas» 

— Pulsando directamente la tecla obtenemos el número correspondiente. 

— Si al mismo ticmrxi pulsamos SIIIKl obtenemos el símbolo que aparece 
impreso en la |>arie superior de la leda. 

t'na excepción es la tecla del cero. 0 . que al no tener ningún símbolo 
impreso origina el carácter 0 , tanto si utilizamos SHIFT como si no. 
(Kl número cero lo representaremos >iempre por 0 , para distinguirlo de 
la letra O.) 

-Modalidad minúsculas»: Funciona igual que la -Modalidad mayúsculas». 



Si. tras pulsar las comillas « que aparecen en la tecla del 2, trata de bo- 
rrar la pantalla SHIFT y CLR, verá que aparece un símbolo en forma de 
corazón, pero que ia pantalla no se borra. Asimismo, si trata ahora, tras 
pulsar un símbolo de comillas, de desplazar el cursor, no conseguirá este 
efecto, sino que aparecerán ciertos símbolos que para el ordenador re- 
presentan las acciones de desplazamientos del cursor. Y lo mismo pasa 
con todas las teclas de acción, menos para la tecla DEL (borrar!. Ade 
más, aunque utilice DEL y borre las comillas, seguirá pasando lo mismo, 
el ordenador recuerda que pulsó unas comillas. 



I 



□ 



Borrar pantalla 
Cursor al origen 
Cursor a la izquierda 
Cursor a la derecha 
Cursor arriba 
Cursor abajo 

n 

F2 
F3 
F4 
F5 
F6 
F7 
F8 



F 1(t . 17 Shnbok» que rrpmrnun ruiu-iuna npeculrr 



En la figura 1.7 se exponen los símbolos que aparecen al pulsar, tras unas 
comillas, ciertas teclas de funciones especiales. La forma más práctica 
de salir, en este momento, de esta situación es apagando y volviendo 
a encender el ordenador. No se preocupe por tratar de entender este com- 
portamiento. No significa que su máquina se haya estropeado. El Com- 
modore 64 funciona asi. y poco a poco nos iremos familiarizando con 
su comportamiento. Otras formas de salir de la situación anterior son: 
tecleando otro símbolo de comillas (el número de símbolos ha de ser 
parí, el ordenador vuelve a su situación normal; pulsando la tecla RE 
TURN; puteando a la vez las teclas RESTORE y RUN/STOP. 



Escribiendo en colores 

La gama de colores que podemos obtener de nuestro Gommodore es muy 
amplia, 10 colores dilcrciitcs. Ni ya nos hemos cansado de que el cursor sea a/ul 
< ¡aro. [mhIiihos mantener pulsada la leda CTRL o la tecla C= y pulsar una 
de las teclas numéricas del I ;il 8 Hágalo diversas veres y observe la variedad 
de colores que nos ofrece el ordenador. Ahora podremos ir esi ribiendo en tinta 
amarilla, verde, roja, etc. (ver la Fig. 1.8). Asi. si pulsamos CTRL y 8, el cursor 
|u\a a amarillo, > cada vez que pulsemos una tecla de este caiácler aparecerá 
en tinta amarilla. Para devolver al cursor su color original pulse C= y 7. 
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• Color normal del fondo. 
Color normal del cursor. 



Inversión de los colores del papel y de la tinta 

Cuando escribimos normalmente, los caracteres aparecen en el color que le 
hayamos asignado a la tinta, sobre un fondo de color azul oscuro. Esto podernos 
invenirlo utilizando la acción RVS ON que aparece en la tecla del 9. Pulse CTRL 
y 9. y a partir de este momento todos los caracteres aparecerán con tinta azul 
oscura sobre un fondo del color que antes tuviéramos asignado a la tinta. 

Para salir de esta situación pulse CTRL y 0(RV5 OFF) y los caracteres irán 
apareciendo en su forma normal (Fie. 1.91. 



Si estamos dentro de un símbolo de comillas, estas asignaciones de co- 
lores e inversiones de los colores de tinta y fondo no aparecerán en su 
forma normal, sino como caracteres que el C-64 entiende (ver Fig. 1 .7). 
Pero, como ya hemos indicado, no se preocupe todavía de esto. 
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La tecla CTRL 

CTRL H la abreviatura de la palabra CONTROL S- sorprenderá de la di- 
versidad de acc iones de control que puede realizar con esla teda Kn el aparta- 
do anterior vimos cómo utilizar CTRI. para controlar el color y la apariencia 
de los caracteres, y en la figura 1 10 se exponen otras acciones de control. 
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La tecla RETURN 



Siempre que haya escrito algo y quiera que el ordenador lo lea. ha de pulsar 
la teda RETURN. Mientras que no pulse esta tecla, el ordenador no hará caso 
de lo que esté escribiendo en la pantalla. Cuando la pulse, el ordenador leerá 
y tratará de interpretar lo que usted nava escrito. Como todavía no hemos apren- 
de! C-64, lo más probable es que obtenga el mensaje de SYNTAX 



La tecla RUN/STOP 



Si estamos ejecutando un programa en el ordenador y pulsamos esta tecla, 
inmediatamente se detiene la ejecución del programa. Esta acción la entende- 
remos mejor en el capítulo próximo. 

I.a aceite combinada de las teclas SiIIFT y Rl'N/S'lOP provoca que el 
< : 64 cargue y ejecute automáticamente un programa almacenado en la Da- 



No hay que confundir esta tecla RUN/STOP con el comando RUN del 
BASIC que veremos más adelante. 



La tecla RESTORE 

l ia de utilizarse conjuntamente con la leda RUN/STOP y su empleo inte- 
rrumpe cualquier programa bajo ejecución y restablece todas las condiciones 
internas de la máquina a su estado original, tal y como si acalláramos de encen- 
der el ordenador. Así. el color de la pantalla vuelve- a ser de azul claro sobre 
Iondo azul oscuro, se interrumpe cualquier sonido que estuviera emitiendo el 
C-(>4. ele. 

Pero la gran ventaja de utilizar RLSTORE y RUN/STOP, en lugar de apa- 
gar v volver a encender el ordenador, es que no perdemos el programa que es- 
tuviera en memoria y podemos corregirlo, mejorarlo o volver a ejecutarlo. 



No hay que confundir esta tecla RESTORE con el comando RESTORE 
del BASIC, que veremos más adelante. 



Teclas de función programables 

Revihen este nombre las cuatro lee las situadas en el margen derecho del C-64 
y etiquetadas con los caracteres fl/12. I3/Í4, fVfb, y 17/1B. A diferencia de otros 
""leñadores, ( -n el Commodore estas teclas vienen sin ninguna función asigna- 
da y Ion métodos para que el usuario pueda asignarles alguna función (distinta 
del mero reconocimiento de si se ha pulsado una de estas teclas o no) se basan 
en el empleo del código máquina, y su explicación queda fuera del alcance de 
esie libro. Sin embargo, algunos de los programas preparados para el C-64 sa- 
fan partido de estas teclas de función. 



HABLANDO CON MI ORDENADOR 



En este momento ya h 
nos queda un pumo para poder 
9Ue nuestro ordenador entiende. 




y, co- 



mo cualquier otro lenguaje, se compone de un conjunto de palabras, llamadas 
comandos- palabras clave etc., y de un conjunto de reglas siniártiras. Kl único 
problema, a diferencia de cuando tratamos de entendernos con nuestro protc- 
SíW de inglés, es que el ordenador no puede tratar de entendernos. Para él los 
inteligentes somos nosotros y no hace más que obedecernos. Así que o escribi- 
mos correctamente las palabras y utilizamos adecuadamente la sintaxis o no^ podrá 
entendernos. ¡Pero no se asuste! Kl conjunto de palabras y normas sintácticas 
no es muy grande v podemos ensacarlas poco a poco, según vayaini» adquirien- 
do confianza. Cuando termine esté libro podrá utilizar combinaciones sofistica- 
das para sacarle el máximo provecho a sus programa*. 

Los comandos que liemos de aprender a utilizar son del tipo: 



ORDEN «contenido de la orden.» 



El decir, le darnos una orden al computador y tras la orden le escribimos 
con qué (icne que llevarla a cafan Así. ejemplos típicos de órdenes son: 

PRINT tjUC lignítica «imprime-, 
LIST que significa -saca un listado de lo que tienes 
dentro». 

RUN que significa «ejecuta un programa». 

etcétera. Quizá el método más fácil para aprender a darle ordenes al computa- 
do! sea utilizándolo como si fuera una calculadora. Vamos a prolwr 



El ordenador como calculadora 

Acabamos de mencionar la palabra PRINT. que indica al ordenador que 
debe escribir algo en la pantalla. Así. por ejemplo, para que escriba un (res te- 
clea mos 

PRINT 1 

V pulsamos la tecla RETURN. La tecla RETL'RN es la que utilizamos para 
indicarle al computador que \<t liemos terminado de escribir y que queremos 
que lea lo que hemos escrito. Mientras no pulse RETURN no pasará nada. Na- 
da más pulsar esta leda el ordenador leerá la linca, comprobará que es correcta 
v si así ocurre obedecerá la orden dada. En nuestro caso aparecerá un 3 en la 
pantalla, debajo de la línea PRI NT 3. Más abaje» aparecerá el mensaje REAm 
con el que la maquina nos comunica que está preparada para la orden siguien- 
te. Probemos con la línea: 

PRINT 3*4 

(acuérdese de pulsar RETL'RN). En este caso en la pantalla no aparece 3 + 4, 
sino un 7. Al llegar al contenido del PRINT y encontrarse con una operación, 
el ordenador interpreta que deseamos que la realice y nos imprime el resultado. 
Los símbolos aritméticos que podemos utilizar con el C-64 son: - para la adi- 



ción. — para la sustracción, " para la multiplicación, / para la división, y T para 
la exponenciacíón Así, las órdenes siguientes producirán los resultados: 

PRI N I 2 + 3-4—1 imprime 13 

PRINT 2/4*(i*3/2 imprime 9.5 

PRINT 2Í3/2 + 5M imprime 19 

Observe que para separar los enteros de los decimales se utiliza un pumo, 
y no una coma como es habitual en España. Lo siento, pero tendrá que acos- 
lumbrarse a esto, pues si no el ordenador no le entenderá y se lo indicara con 
un mensaje de error de sintaxis (Syntax error). Además, no puede |wmer pun- 
tos ni comas para indicar miles o millones. 

No siempre es fácil analizar cómo hemos de escribir una expresión aritméti- 
ca para obtener el resultado deseado. Por ejemplo, en la última de las expresio- 
nes anteriores nos encontramos con la operación 2t3/2. ¿Cómo se lee esto? Podría 
ser bien 2 V2 . ó 2 5 /2. Para resolver este problema recuerde que el ordenador 
siempre actúa bajo dos reglas. 

izquierda a derecha. 

Así la expresión 2T3/2 se interpreta romo 2 3 /2. 

J «* fW» mo-iaaa 

rijfiwii * 

HxpOfN-D.t* tú» « 

Mfno mrnnt 7 
imitnrrti» in-fwiw») 

ntililfln (• 

Mktún 5 
s, i 

I* 1 11 Operador» *rnmíi.<o. v » u » pnond.de. 



Aun con esto no es fácil expresar ciertas operaciones aritméticas ¿Cómo es- 
3 + 2 3 

c ribiríamos — z — ó — — — ? Es obvio que las expresiones 3 + 2/5 y 3/2 + 1 son inco- 
rrectas, pues sus resultados rcspetiivos son 3.4 y 2.5, mientras que los de las 
expresiones originales son ambos 1. Para resolver este problema se recurre a la 
utilización de los paréntesis. Y aquí tenemos otras dos reglas a tener en cuenta 
en las operaciones. 

I: Siempre se evalúa primen» lo que esté encerrado entre paréntesis. 
2: Sí unos paréntesis contienen otros paréntesis, se evalúan en primer lu- 
gar los paréntesis más internos. 



De este modo la operación se expresa como (3 + 2)/5, y la operación 

se puede expresar como 3/(2 + 1). 



2 + 1 



Notación científica 

Hasta aquí hemos representado los números mediante lo que se llama -no- 
tación normal». Un número en «notación normal» puede ser un número entero 
0 un número fraccionario (con un punto decimal), precedido de un signo 
si es positivo, o de un signo -. si es negativo. Ante la ausencia de signo se in- 
terpreta que es positivo. Así, ejemplos de números en notación normal son: 



27 16 377 

-I* -ÍH» 
-J7 

Los números en notación normal pueden tener al menos mhn cifras deci- 
males de precisión, e ini luso pueden llegar a tener '*, dependiendo del número. 
El BASIC del C-r¡4 reali/.a un redondeo automáiH n v. generalmente, redondea 
por encima si el primer dígito despreciado es mayor que tinco y redondea poi 
debajo si éste es menor o igual que cuatro Sin embargo, hay excepciones, poi 
ejemplo: 

PRINT 4444444446 imprime «444444445 
PRINT .4444444445 imprime «444444445 
PRINT .4444444444 imprime 044444444 

Ha\ excepciones. Trate de encontrar alguna. Kn notación normal el C-64 
puede representar números comprendidos entre el 001 > el bien 
seaii positivos o negativos . pero los números lucra de este rango los representa 
mediante la llamada «notación cicntilíca». Kn notación científica un número se 
representa mediante una expresión del ti|xi 



"Mantisa» K -Signo- «Expolíente 



Mantisa: Es un número en notación normal. 

E: Se utiliza esta letra para separar la mantisa del exponente. 

Signo: Indica si el exponente es negativo o positiva Ante la ausencia 
de signo se asume que el exponente es positivo 

Exponente: Número entero formado por una o dos cifras. Indica el nú- 
mero de lugares que hay que trasladar hacia la derecha (si el expo- 
nente es positivo) o hacia la izquierda Isi es negativo) el punto decimal 
de la mantisa para obtener la notación normal. 



Por ejemplo: 



S'o loción normal 
b 3 Etí5 634000 

1 2 e-a: aimmv¿ 

43 F.-W U43 
-43 t-92 -443 
43 t • «2 4.1* 

No se asuste si no entiende bien la notación científica. -Se han escrito miles y 
miles de programas muy útiles sin tener que preocuparse de esta notación. 

Aun utilizando la notación científica existe un límite a los numen» que puede 
manejar el Commodore. 

El número mayor es 1.70141183 B+3$. 
El número menor es 2.93873588 E-39. 

Bien sean positivos o negativos, cualquier número que sobrepase el límite 
superior originará un mensaje de error »OVERFI.OW ERROR» (número de- 
masiado grande). 

Cualquier número que sobrepase el límite inferior dará como resultado un 

cero. 



PROGRAMANDO EL ORDENADOR 

La capacidad más interesante del ordenador es que podemos almacenar ór- 
denes en su memoria y después ejecutarlas cuando lo deseemos. I Lisia ahora 
iodo lo que hemos hei ho ha sido darle órdenes directas, tales como l'RIN V 25, 
\ el ordenador las ejecuta y las olvida. Es decir, si nos hemos equivocado en 
Un cálculo, o necesitamos volver a hacer una operación, tendremos que teclear 
la línea entera, 'trabajar así es lo que recibe el nombre de «modo directo». 

Para entrar en «modo programado» tenemos que escribir un número delan- 
te de la orden que descama darle al computador. 

Así. teclee: 

10 PRINT 25 

) l liando pulse RETL'RN observará que el ordenador no ejecuta esta orden, 
lino que la guarda en su memoria, y el cursor pasa a la línea siguiente. 

Teclee ahora: 

20 PRINT 43-27 

* il pulsar RETL'RN vuelve a suceder lo mismo. Pulse las teclas SHIFT, y 
CLR7HOME para borrar la pantalla. 'Icdec la orden directa RUN (no, no pul- 
se la tecla RUN/STOP. debe teclear las letras de la palabra clave RUN). Esta 
es la forma de mandarle al ordenador que ejecute el programa que tiene den- 
tro, pulse RETURN \ verá aparecer los resultados de la ejecución: los números 
25 y 16. 

Las líneas 10 y 20 siguen en la memoria de la máquina y podemos ejecutar- 
las tantas veces cómo queramos. Cuando deseemos volver a ver nuestro progra- 



ma. basta con teclearla orden directa LIST y pulsar RK.TURN. LIST significa: 
■¿Saca un listado del programa que tienes en la memoria». 
Añadamos ahora las líneas siguientes: 



15 PRINT "43-27" 

30 PRINT "HE AQUI LA DIFERENCIA" 
40 PRINT "FACIL. ¿NO?" 
5 PRINT "MI PRIMER PROGRAMA" 



.Acuérdese de pulsar RETURN tras cada linca. Pulse SHIFT y CLR- HO- 
ME y liste el programa. LIST y RKTURN. Verá que. aunque las líneas 15 y 
f) se han introducido posterior me ti te. en el listado del programa aparecen todas 
las lincas ordenadas crecientemente por su número. Este número delante de 
las órdenes recibe el nombre de «número de línea-, y en el C-64 puede utilizar 
números comprendidos entre el 0 y el 63999. Sin embargo, es práctica habitual 
utilizar números de diez en diez; así . .1 20, 30 ... Si lo desea, puede numerar 
las líneas utilizando la secuencia 1. 2, 3. .. etc., pero si se dejan libres algunos 
números de línea, esto le da la oportunidad de intercalar líneas en los progra- 
mas, lo cual es muy útil cuando nos damos cuenta de que para que funcione 
es necesario introducir algunas líneas entre otras ya existentes. Si usted desea 
numerarlas consecutivamente, o de cinco en cinco, o de diez en diez, o nr.. éste 
es su gusto; el único taso desaconsejable es el primero 

Bti U figura 1.12 se recogen las diversas formas de utilizar el comando I JST 
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mi 

LIST 19 
I.IST -M 

un m- 

LIST I-. 19 


Utia el : fc i.«u i»n>|tlrtu 
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Lwa M u ttimm M u M 

!,«.. (k«k la linca M h-Ma é f.n-1 



Así, el formato general «le U sentencia LIST es: 



LIST «número 1- — -número 2- 



Número 1 Todas las líneas cuyo número sea superior a «número 1» 
aparecerán en el listado a menos que sobrepasen el valor indicado 
en «número 2». Por delecto el listado comenzará en la pr.mera linea 
el programa. 

Número 2 Todas las lineas cuyo número sea inferior a «número 2» 
aparecerán en el listado a menos que sea también interior a «número 
1». Por defecto el listado terminará en la última linea del programa. 

Si tras LIST aparece un solo número (sin guión), se listará la linea corres- 
pondiente a ese número, si es que existe. 



Para ejecutar el programa anterior teclee RUN y pulse RETURN. En la 
pantalla aparecerá: 

Mi PRIMER PROGRAMA 

25 

43-27 
16 

HE AQU LA DIFERENCIA 

v va sabemos cómo imprimir literales. Observe el resultado de la línea 5. Cuan- 
|. el ordenador llega al contenido del PRINT y detecta las comillas, interpreta 
que descamo* que el contenido entre comillas aparezca en pantalla tal y como 
rstá. v así lo han-. Es decir, cuando utilizamos comillas le indicamos al ordena- 
dor que copie exactamente lo que hay enere comillas. Fí jese ahora en la diferen- 
cia entre las líneas 15 y 20 

15 PRINT •'43-27" imprime 43 27 
20 PRINT 43-27 imprime Hi 

KnIh diferencia la reflejamos diciendo que en la línea 20 estamos trabajando 
Con tonlrnidm numéricos, mientras que en la 15 el contenido es alfanumérico. 
y. i .ilf.inuiiicrico nos referimos a cualquier secuencia de letras, dígitos o símbo- 
lo, tales como el punto, la coma, etc. (esto suele recibir el nombre de •cade- 
na*), V para que el ordenador trate con ellos deben ir encerrados entre comillas. 



Podemos no poner las comillas finales, por ejemplo: 

100 PRINT Hola 
y el ordenador interpretará bien la linea, pero no se acostumbre a hacer 
esto, pues sólo lo podra utilizar en PRINT cuando sean tan sencillos co- 
mo el del ejemplo anterior. En sentencias PRINT más complicadas, por 
ejemplo, con varios campos, obtendrá mensajes de error. 



Otra forma de utilizar la instrucción RUN es escribiendo delras un número 
de línea Así RUN solo, sin ningún número detras, ejecuta el programa com- 
pleto, empezando por la línea 5 y terminando en la 4fl mientras que el coman- 
do RUN 30 ejecuta desde la línea 30 hasta el final. La estructura general de la 
"cniem ia RUN es: 



RUN «núm. de línea- 



Número de linea: Indica la linea de programa en que comenzara la ejecu- 
ción. Por defecto se toma desde la primera linea. Si el número indica 
do no coincide con alguna linea del programa, obtendremos el mensaje 
de error «UNDEF'D STATEMENT ERROR». 



de programas 

Con frecuencia* escribiendo programas, cometeremos muchos errores, y ten- 
dremos que conocer de qué métodos disponemos para corregirlos. Vamos a re- 
pasar aquí las posibilidades que nos ofrece el Commodore. 

Suponga, en primer lugar, que en la línea 5 deseábamos poner: 

5 PRINT "MÍ SEGUNDO PROGRAMA" 

en lugar de; 

5 PRINT "MI PRIMER PROGRAMA" 



E 



Este es el momento de volver a repasar el tun< ionamiemo de las teclas CRSR 
•M\ CRSR t/1 e INST/DEL. Liste el programa v utilice las ícelas CRSR 
ira colocar el cursor SOBRE la P de PROGRAMA Utilice la tecla DEL para 
»rrstr la palabra PRIMER. Ahora pulse manienidamente SHIFT > pulse oche 
veces la teda INST/DEL para insertar los ocho espacios que necesitamos (siete 
para SEGUN IX) y un espacio en blanco entre las palabras). Teclee la palabrr 
SEGUNDO y pulse una vez la barra espadadora para colocarte encima de l< 
P. Pulse ahora la tecla RETl'RN para que el ordenador lea la linca corregida 



Si después de corregir, no putea RETURN, sino que utiliza las teclas CRSR 
para salir de esta posición, el ordenador no tomará en cuenta la corree- 
ción, aunque ésta aparezca en pantalla. Compruébelo actuando de este 
modo e introduciendo después el comando LIST. 



Sí lo que deseamos es borrar una de las líneas existentes, basta ton tet Ira 
el número de línea correspondiente v pulsar la tecla RETURN. 

Por ejemplo: pulse 10 y RE TURN. Ahora, liste el programa y comprueba 
que la línea 10 ha desaparecido. 

Pata lambiai la línea 

20 PRINT 43-27 

paill que el contenido sea 5'4. en lugar de 43-27, podemos utilizar la tecl 
INST/DEL para realizar las correcciones o simplemente teclear 

20 PRINT 5'4 

y pulsar RETURN. 1.a nueva línea 20 ocupará el lugar de la antigua Con* 
pruébelo listando el programa. A veces es más cómodo escribir de nuevo un 
línea que andar buscándola v corrigiéndola. En ocasiones es necesario escrib 
varias líneas cuvo contenido es lustante similar. En este caso es más cómod 
componer las diversas líneas a partir de la primera de ellas. Suponga que, e 
este caso, deseamos duplicar la línea 40 Utilice las te» las CRSR » INST DE 
para borrar el 4 y poner un r > en su lugar. Pulse RETL'RN y después lisie • 
programa. Tendremos las líneas: 

40 PRINT "FACIL, ¿NO?" 
50 PRINT "FACIL, ¿NO?" 

y sólo con cambiar un carácter. Fácil, ¿no? 



Cuando se canse de jugar con este programa, o con cualquier otro de los 
iniciales, introduzca (RETURN) el comando NEW. NEW significa ..nuevo» v 
borra el programa de la memoria de la máquina. Si ahora trata de listar el pro- 
grama, sus esfuerzos serán inútiles. 

MAS DETALLES SOBRE PRINT 

Con una sentencia PRINT podemos imprimir más de un número o una 
cadena Para ello hemos de utilizar «separadores», entre los números o cadenas. 

Separadores 

Vamos a ver aquí la acción del punto y coma (;) y de la coma (,). Considere 
el programa siguiente: 

10 PPINT 34.5 

2Pi PPINT "2+3= H ;?+3 

3« PPINT "2+3="; 

40 PPINT 2+3 

50 PPINT "EL PFSULTADn DE" ; ?.i M + M ;3; "ES." 
;2+3 

t.0 PPINT "HOLA" ■ "PEPF" 

l'.n la línea I0el ordenador se encuentra con dos campos numéraos separa- 
dos < on un pumo y coma. Observa que los iumrimc uno ■ < uní ilinación del otro, 
peto serrados |>ór dos espac ios en blanco. Kl primero lo |H)iic el Commodore 
romo separación de cati>|M> numérico: el segundo corresponde al signo, en este 
• .w no impreso del número 5. En el resultado de la linea bfl comprobara que 
en caso de que los campos sean allanuméncos, el C-64 no deja espacios en blan- 
■ 1 n la línea 2<A se separan, mediante un punto y coma, un campo alfanuméri- 
co de uno numérico. Pero líjese en las líneas 30 y 4tí Tratan de demostrar que 
el punto y coma no sólo sir\v de scjwrador de campos, sino que además obliga 
a que lo siguiente que se imprima en pantalla aparezca a coni inuación. sin sallo 
de línea. Así, un PRINT que termina en punto y toma inhibe la acción natural 
de salto de línea del PRINT siguiente En la línea 50 se presenta un PRINT 
c<»n seis campos de impresión. Un exceso. A este respecto, la única limitación 
el que una línea de programa, en el C-64. no puede ocupar más de BU caracte- 
res (dos líneas de pantalla). Si no respeta esta norma, el C-64 no hará caso de- 
is línea que pretenda introducir. 

ti separador coma (.) actúa de forma bastante diferente. Sirve también para 
separar campos, como el punto y coma, pero además divide la pantalla en cua* 
1*0 zonas de impresión, cada una de 10 espacios. Para comprender mejor esto 
mire la figura 1.13. Cada fila de la imagen está dividida en 40 posiciones de ca- 
rácter (numeradas del aJ 39). Si introducimos la instrucción: 

10 PRINT 1. 2, 3, 4 

Veremos aparecer los números I, 2, 3 y 4 en las posiciones I, II, 21 y 31 
°e una fila (recuerde que cuando se imprimen números, siempre hay un espa- 
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rio delante para poner el signo), indicándonos que es ahí donde comienzan la 
primera, segunda, «en era v cuarta zona de impresión, respectivamente. Así. el 
efecto dé la coma es el de sallar al principio del siguiente cuarto de pantalla. 
Teclee, por ejemplo, el programa: 

10 PRINT 1,¿> 3.4,3,6.7,8 

2* PRINT "PEPE"' "JIJAN" . "LUIS" . "MANUEL" 

30 PPINT "NO VALE TANTO" . "PEPE" 

Con las dos primeras líneas observaremos el comportamiento normal de la 
coma, pero en la línea ;i0 el primer campo ocupa más de 10 caracteres, por lo 
que, al saltar al principio de la zona siguiente. PEPE aparecerá impreso a partit 
de la columna 2tí Pruebe a ver qué ocurre si tras el 8 de la línea 10 colina una. 
dos. o tres tomas. ¿Qué significa el resultado de ejecutar el programa? 



Funciones de impresión 

Puede que le parezca excesivo tanto truco de impresión, sin embargo, es al- 
go que agradecerá cuando sus programas se vayan complicando y desee una buena 
presentación visual de la ejecución. Dos de los elementos más típicos en una 
buena impresión tienen que ver con el margen y con el espacio entre los ele- 
mentos a imprimir. 

Para resolver el problema del margen, el C-64 dispone una función llamad; 
TAB (tabulación). Que ha de ir seguida de un número encerrado entre párente 
sis. Este número indica en qué columna se va a imprimir el primer caráctet 
de la expresión deseada (los números de columna, en la pantalla del Commodo 



\* PP T NT TAB<11>:"EST0 ESTA CENTRADO" 

¿ig pr r nt 

3¿ PRÍNT 

40 PRINT "ESTO NO" 

?0 PRINT TRBC55 ; "V ESTO" ; TABC30) ; "TAMPOCO" 

En la primera línea utilizamos 1AB(11) para central un literal. Recuerde que 
]a pantalla tiene 40 columnas. Por otra parte, la frase ESTO ESTA CENTRA 
DO ocupa 18 caracteres (acuérdese de contar los espacios en blanco). Así. 
10-18 = 22. nos sobran 22 can* teres en la línea, y para (mirar la frase tendremos 
que dejar II en el mareen derecha y otros 11 en el izquierdo, En las líneas 2W 

y 3* se utilizan dos PRÍNT vacíos para provocar que la frase KS'IX) N( ) se es- 
criba dos líneas más abajo de la Irase anterior. El ordenador al leer un PRINT 
lo primero que hace es saltar a la línea siguiente. Si no hay nada HUI imprimir 
pasa a leer la instrucción siguiente 1.a línea ítfl muestra cómo podernos Utilizar 
diwnms TAB en un PRINT Tenga cuidado de no introducir un espacio en blanco 
entre el TAB v el primero de los paréntesis, pues obtendrá un mensaje de error. 
"?BAD SUBSCRIPT ERROR IN-núin. de linea» que indica que hay un 
errui en el índice del TAB en la linea v. núm. de linea t 



El separador «,» puede omitirse tras el TAB y también, en muchos casos, 
entre campos cuya separación esté bien definida. Por ejemplo, teclee: 

100 PRINT "3+2=" 3+2 

V verá que no incurre en error por omitir el «;». Modifique la linea 50 del 
programa anterior, borrando todos los punios v coma, y vuelva a eje- 
cutarlo. 



Boire el programa anterior NEW v RETURN, limpie la pantalla SI HIT 
v CLR/HOME y pasemos al siguiente ejemplo: 

10 PPINT TABf'5>"PflTO , STAB(.20) (, OTPO"iTAE-r 
39 >" PATO" 

2e PP I NTSPC 5 < " DATO" , SPC Cl 1 ) "OTRO " j SPC < 6 
> "DATO" 

Ejecute el programa y observe que el efecto de anillas líneas es el mismo, 
c-n las líneas 18 utilizamos TAB para indicar la columna en que deseamos \ 



s e comience a escribir cada cadena, mientras que en la línea 2w empleamos SPC 
(abreviatura de SPACE. ESPACIO) para indicar el número de espacios en blanco 
que deseamos que existan antes de escribir cada cadena. 



Dentro de los paréntesis del TAB o del SPC podemos poner un número 
entre 0 y 255. Un número fuera de este rango provocara un mensaje de 
"?ILLEGAL QUANTITY ERROR IN «núm. de línea»", que significa: error 
por cantidad no permitida en la linea indicada por «núm de linea». 



Utilización de las teclas CLR/HOME y CRSR dentro del PRINT 

Las acciones de borrar la pantalla CKR y de desplazamiento del cursor HO- 
ME y CRSR puede emplearse dentro de una sentencia PRINT. Esto es muy 
Útil, pues nos permite borrar la pantalla antes, o en medio, de la ejecución de 
un programa y colocar los caracteres a imprimir en el lugar que deseemos de 
la pantalla. Para realizar esto tendremos que pulsar la tecla deseada, por ejem- 
plo. C 'LR, dentro de un PRINT altanuinérico (aquel cuyo contenido está ence- 
rrado entre comillas), pero nos extrañará que al hacer esto no aparecerá la palabra 
C-LR, HOME 0 CRSR, sino un carácter que representa esta acción. 

En la figura 1.14 se exponen los caracteres que representan a estas acciones 
(Estos caracteres, así como los que representan a los colores y otras acciones 
se expusieron también en la figura 1.7.) 



SI 


HOME 


m 


CLR 


□D 


CRSR - 


CE' 


CRSR - 


B3) 


CRSR i 


m 


CRSR T 


Kíg 1 14 mima* 





Así. por ejemplo, tecleo el programa siguiente: 
10 PRINT "IT 

20 PRINT "•P»»»PJPWPr««PHOLR" 

30 PRINT "ÍT 

40 PRINT INMMIHPEPE 1 ' 



La línea 10 borra la pantalla y coloca el cursor en la esquina superior iz- 
quierda. La línea 20 desplaza el cursor cinco columnas a la izquierda, j J 1 , 
y siete filas hacia abajo, : Q y en esta posición escribe la palabra HOLA. Tras 
esto. la línea 30 devuelve el cursor a la esquina superior izquierda, pero sin bo- 
rrar la pantalla, y la línea 4Ü después de desplazar el cursor 10 lugares a la iz- 
quierda, imprime la palabra PEPE. Observe que hemos conseguido imprimir 
el contenido de la línea 40 por encima de la palabra PEPE. Ahora ya sabemos 
cómo escribir en cualquier lugar de la | 



Entre las comillas también podemos introducir los colores y otras accio- 
nes, tales como RVS ON. RVS OFF etc. y. como en el caso anterior, en 
la linea PRINT aparecerán los caracteres que los representan. Volvere- 
mos sobre esto al hablar de gráficos. 



Para finalizar, vamos a exponer el formato general de la sentencia PRINT: 



PRIN T «lista de impresión» 



Lista de impresión: puede estar formada por diversos campos, alfanu 
mericos o numéricos, delimitados por separadores. 



LA DATASSETTE 

* 

Esto es mucho más importante de lo que a primera vista pueda parecer. Po- 
< o u poto irá mejorando en su programación en BASIC c irá construyendo pro- 
gramas que es una pena perder cuando desconecte el C-64. Cuando desconecta 
el C-64 se borran lodos las instrucciones que usted haya almacenado en su memoria. El 
trabajo de teclear un programa es demasiado tedioso como para tener que vol- 
VCl a repetirlo cada vez que em endemos el ordenador. Además, otras veces, de- 
searemos copiar y guardar programas útiles que hayamos visto en algún libro, 
revista, eti . Pues bien, para esto sirve la Datassctlc. Con ella (jodiemos grabar, 
■ tuno si fuera música, unios los programas que queramos en cintas, y después, 
(uaudo al día siguiente queramos volver a ver un programa, podremos repro- 
duciríais en el ordenador a partir de la cinta, ; Estupendo! ¿No? Poco a poco ire- 
■!:«". i rcindu miesira biblioiet a de juegos, utilidades, programas edu( ativos, ele, 
Pero un poco de calma, lo primero que hay que hacer es aprender a utilizarla. 
Para cmpeZ**; UOOS consejos. 

— Compre cintas de corta duración. C-5, C-10, C-15, C-20. En ocasiones 
arriesgadas se pueden utilizar cintas de 60 y 9t) minutos, pero cuanto 
más largas, más posibilidades de errores, y posible deterioro, y más tiempo 
gastado en encontrar los programas. Claro que también son. propnrcio- 
nalmente. más baratas, pero el riesgo no merece la pena. 

— Rcbobine varias veces las cintas, en aml>as direcciones, antes de utilizar- 
las. Las cintas se bobinan a alta velocidad, con lo cual es posible la exis- 
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C„. 1.13 UprnlJUdelC-M 



i ¡o delante para poner el .««no), indicándonos que es ahí donde comienzan la 
primera segunda, tercera v ruarla zona de impresión, respectivamente. Asi. el 
erecto d? la con» W el de saltar al principio del «guíeme ruarlo de pantalla. 
Tecleé, por ejemplo, el programa: 

PRINT 1 »2¿3>4*5*6í7j8 

20 PRTNT "PEPE"» "JUAN". "LUIS" • "MANUEL" 
39 PRINT "NO VHLE TANTO" > "PEPE" 

Cnn las dos primeras líneas observaremos el romportamiemu normal de la 
roma, pero en la línea 30 el primer campo «« upa mas de 10 caracteres, por lo 

Jue. al sallar al principio de la zona siguiente. PEPE aparecerá impreso a partir 
r la columna 20 Pruebe a ver qué ocurre si tras el H de la linea 10 coloca una, 
dos, o tres coma». ¿Qué significa el resultado de ejecutar el programa. 



Funciones de impresión 

Puede que le parezca excesivo tamo truco de impresión, sin embargo, es al- 
go que agradecerá cuando mis programas se vayan complicando y desee una buena 
presentación visual de la ejecución Dos de los elementos mas upicos en una 
buena impresión tienen que ver con el margen y con el espacio entre los ele- 
mentos a imprimir u i 

Para resolver el problema del margen, el C-64 dis|»nc una función llamada 
TAB (tabulación). Que ha de ir seguida de un número encerrado entre parénte- 
sis Este número indica en qué columna se va a imprimir el primer carácter 
de la expresión deseada (los números de columna, en la pantalla del Commodo- 



I* PPINT TfiB<n>:"ESTO ESTA CENTRADO" 
20 PPINT 
W PPINT 

4* PPINT "ESTO NO" 

50 PPINT TWKS->I H V ESTO" ; TflB(3@> ; "TAMPOCO" 



Ku la primera línea utilizamos TAB(111 para icninir un literal Recuerde que 
la pantalla tiene 40 columnas. Por otra parte, la frase KS'IO ESTA CENTRA- 
DO ocupa 18 caracreres (acuérdese de contar los espacios en blanco). Así. 
40-18-22. nos sobran 22 caracteres en la línea, v para centrar la frase tendremos 
que dejar II en el margen derecho y oíros II en el izquierdo, En las líneas 20 
\ 10 se utilizan dos PRINT vacio- para prmm ai que la Intse ESTO NO se es- 
i riba dos lincas mas abajo de la frase anterior El ordenador al leer un PK I NT 
lo primero que hace es saltar a la línea siguiente. Si no hay nada para imprimir 
pasa a leer la instrucción siguiente La línea 50 muestra cómo podemos utilizar 
Im iN.s TAB en un PRIN T Tcnija i u «lado de no imroducir un espju i<i rn blam o 
i ntre el TAB v el primem de los paréntesis, pues obtendrá un mensaje de eiror. 

RAI) Sl'BSíRlPT ERROR IN«num de linea» x\ que indica que hay un 
error en el índice del TAB en la linea v. núm. de línea x. 



El separador «; » puedo omitirse tras el TAB y también, en muchos casos, 
entre campos cuya separación esté bien definida. Por ejemplo, teclee: 

100 PRINT "3 + 2=" 3+2 



y vera que no incurre en error por omitir el «;». Modifique la linea 50 del 
programa anterior, borrando todos los puntos y como, y vuelva a eje 
cu lado. 



Borre el programa anterior NEW y RETL'RN. limpie la pantalla SHIET 
* Ca.R/IIOME v pasemos al siguiente ejemplo: 

1* PPINT TflB^>»DñTO".Tflí!r20VOTPO' , ;TñE< 
30>"TJflTO" 

PRINTSPC'5 » " DATO" . S PC< 1 1 > "OTRO" ¡ SPC<6 
'"DATO" 

Ejecute el programa y observe que el efecto de ambas líneas es el mismo. 
En las líneas 10 utilizamos TAB para indicar la columna en que deseamos que 
^ comience a escribir cada cadena, mientras que en la línea 20 empleamos SPC 
(abreviatura de SPACE. ESPACIO) para indicar el número de espacios en blanco 
*l ü e desearnos que existan antes de escribir cada cadena. 



espera el ordenador comenzará la carga por su cuenta. Una vez realizada la carga 
con corrección nos informará con el mensaje: 

LOAJDING 
READY 

Liste el programa y vuelva a utilizarlo, corrigiéndolo, ampiándolo, volvien- 
do a hacer pruebas de grabación y reproducción, etc- 

lixistc otro método de cargar un programa de la Datassctte. Si pulsa las te- 
clas SHIFT y RUN/STOP, el ordenador cargara (LOAD) y ejecutará (RUN) 
autoináticamente el primer programa que encuentre en la cinta. 

Para cargar, y no ejecutar automáticamente, el primer programa que 
cuenta el ordenador en la cinta, teclee solamente: 

LOA!) 



ningún nombre de programa) y pulse RETURN. 

Con esto ya está preparado para ir creando su propia biblioteca de progra- 
mas. El trabajo de creación es pesado, y es aconsejable, para evitar la pérdida 
de tiempo, seguir los consejos siguientes: 

— Realice copias de seguridad de los programas, en cintas distintas y con- 
sérvelas por separado. 

— Mantenga las cintas lejos de las fuentes de calor, magnetismo o hume- 
dad; por ejemplo: radiadores, sol. televisores, etc. Es mu> frecuente, al 
principio, dejar las cintas encima del televisor o monitor; evítelo. 

— Con cada cinta, acostúmbrese a llevar una lista de los programas alma- 
cenados en ella y de «en epié vuelta» utilizando el cuenta vueltas de 
la DaUssetlc) comenzó la grabación de cada programa. Esto le ahorrará 
RlUChO tiempo de búsqueda. 

Como resumen, recuerde que el formato general de las sentencias SAYE. 
LOAD, VERIKY es: 



SAVE "-nombre de programa»' 



LOAD "«nombre del programa»' 



VERIFY "..nombre de programa*" 



Nombre do programa: Cualquier secuencia de caracteres cuya longi- 
tud no exceda de 16. Podemos utilizar nombres más largos, pero el orde- 
nador sólo utilizará los 16 primeros caracteres. 

- Podemos prescindir de las comillas finales y el ordenador entenderá 
la instrucción. 

- Podemos utilizar simplemente las palabras SAVE. LOAD o VERIFY y 
el Commodore: 

Grabará (SAVE) el programa sin nombre. 

- Cargara (LOAD) el primer programa que encuentre. 

- Tratará de verificar (VERIFY) el primer programa que encuentre, 
con el que tiene en la memoria. 



En este momento ya está provisto del material necesario para sacarle el m; 
ximo aprovechamiento a su aprendizaje del lenguaje BASIC en su C-64. Ad« 
tafite v diviértase aprendiendo a controlar un ordenador. 



2 Programación básica 



INTRODUCCION: CONCEPTO DE VARIABLE 

Utilizar PR1NT para resolver cálculos aritméticos más o menos complica- 
dos puede resultar útil en múltiples ocasiones, pero, naturalmente, el gran auge 
y desarrollo de jos ordenadores no se debe a que con ellos podamos realizar las 
miMiias o|M-ni< iones que con una calculadora He bolsillo. 

Una cíe las características que hacen que los ordenadores sean tan versátiles 
y potentes es su capacidad pon almacenar no sólo los programas, sino también 
los datos que éstos utilizan. 

En el capítulo anterior vimos cómo almacenar un programa en la memoria 
del computador y. aún más, cómo grabarlo en un dispositivo accesorio para po- 
der conservarlo en nuestra biblioteca de programas. Ahora hemos de aprender 
i'tm*» almacena! > utilízat dalos en el ordenador, y con ello viene una de las 
ideas más sencillas e importantes de la programación: el concepto de VARIABLE. 

Digamos, en general, que una variable es un lugar de la memoria en el que 
podemos guardar el dato que queramos. Así. si deseamos almacenar el nombre 
de una serie de amigos o una serie de números, utilizaremos una serie de varia- 
bles. Kl concepto de variable, grano modo, « éste: el de un almacén. 

Xombrr «Ir L v.itMhlr -» A B C 

Contenido de U variable - | 2 | 4 — 7 

Rl Z 1 BiWiMB» ilrl *<.mr|Hu ilc variable. 



Para asimilar mejor este conceptu suponga que la memoria está dividida en 
una serie de casillas véase Fig. 2.1 En cada casilla podemos guardar un dato, 
un número o un nombre, y después utilizarlo cuando lo necesitemos. Mas para 
utilizar, o llamar a. un dato tendremos que disponer de alguna lórma de recono- 
cer en cjuc lugar está guardado. Así surge el concepto de nombre de variable. A 
una casilla le ponemos el nombre A y después introducimos en ella un dato. 
He ,:stc modo, refiriéndonos a la figura 2.1, en la casilla A tenemos un 2; es de- 
cir, la variable A tiene asignado un 2; la variable B contiene un 4, y en la varia- 
ble C hemos introducido un — 7. Acerca de los nombres que podemos utilizar 
para representar las variables, hablaremos en el cuarto apartado de este capítu- 
lo, pasando ahora a desc ribir cómo podemos introducir contenidos en las varia- 
bles y cómo podemos utilizarlas. 



Asianación de contenido a variables numéricas 



Pero, ¿cómo le decimos al ordenador que guarde un 2 en la variable A?, 
¿cómo le decimos que una variable se va a llamar A;' Para esto disponemos 
oiro comando del BASIC, el comando LET. Para escribir este comando ter 
mos que atenernos a la sintaxis: 



LET «nombre de variable» = «expresión» 



Por ejemplo; Si introducimos LET A=2, al leer el computador esta orde 
lo primero que hace es buscar en su memoria si ya existe alguna variable q 
se llame A; si es así, borra el contenido anterior de la variable y le asigna 
valor 2. En caso contrario, toma una casilla vacía, le pone romo nombre A 
introduce en ella el 2. 

F.l número que se guarda en una variable puede ser resultado de una opei 
ción aritmética. Así, por ejemplo, LET B-2*3-fl significa que en la variar 
B se introducirá un /. Considere el programa siguiente. 

10 LET ñ=2 
20 LET B»4 
38 LET OR+B 
40 PRINT C 

En la línea \1t\ el ordenador se encuentra con que tiene que tomar una ca 
lia, ponerle por nombre A e Introducir en ella un 2, Asimismo, en la linea 
asignamos un 4 a la variable B. Al llegar a la línea 30 el ordenador interpn 
que tiene que definir una variable C e introducir en ella el resultado de su ni 
los contenidos de las casillas A y B. Finalmente, en la línea 40 le ordenan 
al lumpulador que busque el contenido de la casilla C y lo imprima en la pa 
lallu. Por lanío, el resultado es que, al ejecutar el programa, aparecerá un 6 
la pantalla. ¿Y tanto rollo para esto? Créalo, el salto es grande, antes sólo sab 
mos hacer cálculos con PRINT, ahora ya sabemos realizar operaciones sin i 
cesidad de imprimirlas en la pantalla, utilizar números y variables en 
operaciones v guardar los datos, los resultados intermedios y el valor final 
la memoria del computador. ¿Qué le parece el programa siguiente?; 

10 REM ESTE PRDRPAhA CALCULA LA LONGITUD Y EL 

AREA DE UN CIRCULO DE RADIO 5 
20 LET R=f=¡ 
30 LET U=2*it*R 
40 LET fl=ti*PT2 

50 ppiht "lr longitud de lfl circunferencia 
de r=";r;"E3";l;"V su rper es";r 



Quizá lo más notable es la complicación del PRINT con gran cantidad 
campos numéricos y alfanuméricos separados por el símbolo de punto y con 




Importante: Recuerde que antes de comenzar a 
ble borrar el anterior (NEW y RETURN), pues si 
tes programas i obtener resultados no deseados. 

Como va hemos mencionado, si en una variable que tuviera asignado un 
» úntemelo introducimos otro, el contenido inicial se pierde. Compruébelo te- 
cleando este programa: 



10 LET fl=5 
?0 LET fl«10 
30 PPINT"fl=";fi 



Icciee RUN y pulse RETURN y verá que en la pantalla aparece A- 1» ¿Y qué 
ha pasado con el .V Muy sencillo, al introducir un 10 en A hemos borrado el 
3 que contenía anteriormente. 

Un pumo a destacar es el significado del signo "-" que aparece en la sen- 
tencia de asignación. F.l signo igual de la sentencia LET no tiene nada que ver 
con la interpretación habitual en matemáticas. No significa que lo que aparece 
I l.i derecha del signo sea igual a lo que ajarece a la izquierda, sino que en 
la variable que aparece a la izquierda del signo igual hay que almacenar el resulla- 
do de evaluar la expresión de la derecha. Considere el programa: 



10 LET fl»l 
20 PRINTH 
30 LET R=H+4 
40 PPINTR 



En la línea lfl la expresión A- 1 asigna a la variable A el valor 1. üespués, 
en la línea 3ft nos encontramos con la expresión A-A + 4. Es evidente que. ma- 
temáticamente hablando, esta expresión es incorrecta, pero es que en la senten- 
cia LET esta expresión no significa que A sea igual a A + 4, sino que el nuevo 
valor de A será el resultado de sumar el antiguo valor de A (un 1) y el 4. Al ejecutar 
el programa comprobara que en la pantalla aparecen los números 1 (línea 20) 
y í (línea 40). 

La línea 10 del programa anterior realiza lo que en programación recibe el 
nombre de inicializaetón de variables. Si deseamos que una variable tenga cierto 
valor inicial, tenemos que dárselo. St utilizamos una variable que no hemos ini- 
f i al izado, el Commodorc le asigna directamente el valor inicial 0 Compruébelo 
borrando la línea 10 del programa anterior (teclee un 10 y pulse RETURN). 
Al ejecutar ahora el programa, en la pantalla aparecerán un 0 y un 4. Un 0 por- 
que la línea 10 al tener que imprimir una variable no inicializada le asigna el 
valor 0, y un 4 porque en la linea 40 introducimos en A el resultado de sumar 
su antiguo valor, un cero, y un cuatro. 

Trate de escribir un programa para intercambiar el contenido de dos varia- 
bles. Esto es, queremos poner en A el número que hay en B, y en B, el que 
hay en A. No podemos hacerlo directamente, pues, por ejemplo, A= B introdu- 
ce en A el valor de B, pero borra el valor inicial de A que después tendríamos 
q»c poner en B. Inténtelo y compare después su solución con el método pro- 
puesto en la figura 2.2 y en el programa siguiente. 



X 



0 J | r " Variable para el cambio 



Contenidos a permutar 



A B 



0 

© 

Fír 2.2. PMtt pan. prrmuut el (onirnkfc. <ir tU» 



I? 

20 
39 
40 
30 
60 
70 
80 
90 

100 



LET A=5 
LET B=7 

PRINVANTES DE Lfl PERMUTACION" 
PRINT"fl"=";A 
PPINT M B«";B 
PRINT"X* n ;X 
LET X=B 
LET B=fl 
LET A=X 

PRI NT "DESPUES DE Lfi PERMUTACION" 



110 PRINT"R="ifl 
120 PRINT"B=";B 
130 PRINT"X»":X 

Las líneas 10a 60 se ocupan de inicializar las variables y de presentar sus 
valores en la pantalla. Como no hemos iniroclutido ningún valor en la variable 
X. el C-64 le asigna el valor « El intercambio se realiza en las líneas 70 a 9« 
y las líneas 100 a 130 se dedican a la presentación del estado final en la pantalla. 

Hasta ahora, para almacenar números, hemos utilizado un tipo de variables 
que podríamos llamar variables numéricas normales o variables reales. En estas varia- 
bles podemos guardar datos tales como 5, 3.67, 412. 2.584 E09. etc. Sin embar- 
go, si tenemos la seguidad de que lo que vamos a guardar son números enteros, 
podemos utilizar otro tipo de variable llamado variables enteras. Estas variables 
se caracterizan porque su nombre ha de ir seguido por el símbolo por ejem- 
plo, A%, B%,... etc.. para que el ordenador reconozca que deseamos que el con- 
tenido sea un número sin decimales. Ensaye el ejemplo sigu.ente: 

10 PErl UTILIZACION DE VARIABLES ENTEPHS 
20 LET A=6.3 
30 LET B=5.2 
40 LET ñ'/.=6.3 
LET B>;=5.2 



•50 PPINT"R=" ; A 
70 PPTNT"ñV= M ifl^ 
#0 PRTNT"B=" ; B 

90 ppi nt ;B/¡ 

!00 PPINT"HE AQUI I.R TUFFPFNCTR" 

En las lineas 40 y 54 al tratar de introducir los números 6.3 y 5.2 en las 
variables enteras A% y B%, respectivamente, el ordenador toma sólo la parte 
entera del número, esto es. 6 y 5. ¡Tenga cuidado con esto! Por otra parte, líjese 
^n lo que orurre rn el programa siguiente: 

!0 PEM COMPORTAMIENTO DE Lftá VARIABLES 

ENTERAS 
?fl LET 

^ LET B>:=-7.3 
40 PPINT'W.'=";HK 
■S0 PRINT"B*=";B-Í 

Aquí comprobará que el ordenador realiza lo que en matemáticas recibe el 
nombre de lomar la parte entera, esto es, se loma el primer número entero cuyo 
valor sea menor que el número dado. F.l primer entero cuyo valor es menor que 
( es 6, pero el primer entero cuyo valor es menor que —7.3 es — 8. Curioso, ¿ño? 

La importancia del empleo de variables enteras se basa, entre otras cosas, 
en que ocupan menos memoria (menos de la mitad que una varible real) v en 
que el ordcnaoW tral>aja más rápido ton ellas. El ahorro de memoria ira to- 
mando importancia según avance en la programación 

Asignación de contenido a variables alfanumérlcas 

Cuando introdujimos el tomando PR1NT vimos que el ordenador puede 
manejar dos tipos de datos: dalos numéricos y datos allanuméncos. Para alma- 
cenar datos numéricos disponemos de las variables numéricas, y, como usted 
\<i se imaginaba, para almacenar datos alfanuméricos. nomines, direcciones, etc.. 
existen variables alfanuméruas. F.n las variables alfanumcricas podemos guardar 
" i uencias de caracteres, letras, dígitos, símbolos n caracteres gráficos. Para que 
el ordenador reconozca que estamos definiendo una variable alf¿inumérica le- 
ñemos que colocar el símbolo $ como final del nombre Así. el programa: 

1« LET AÍ="PII AP ES NI PRIMA" 
20 PPINT AS 

en la línea 10 gualda la cadena PILAR ES MI PRIMA en la variable AS y 
después la línea 2A imprime en la pantalla el contenido de A$. Observe, en la 
línea lfl que el conjunto de caracteres que vamos a asignar a una variable alfa- 
numérica ha de ir encerrado entre comillas. 



Como siempre que hablamos de cadenas, las comillas finales pueden ol- 
vidarse, pero sólo si nos estamos refiriendo a una sentencia tan sencilla 
como la de la línea 10 del programa anterior. En otros casos se arriesga 
a obtener errores en la ejecución. Asi que una buena norma es la de olvi- 
damos de esta particularidad del C-64 y teclear siempre las comillas finales. 



Un pumo importante a recordar es que un espacio en blanco dentro de unas 
comillas es un carácter más. Un espacio en blanco fuera de las comillas es igno- 
rado ]>or ¿1 ordenador 

Operaciones con cadenas 

Si bien podemos guardar dígitos en las variables al fanumé ricas, no pode- 
mos realizar operaciones aritmética* con ellas, ya que cuando los números están 
«I forma de cadena el ordenador los interpreta como caracteres y no como nú- 
meros. Así, la cadena "12" es la secuencia l, '2. pero no el número 12. Com- 
pruebe CfUC al ejecutar el programa: 

10 LET Rf-"5 M 
0? PPIMT R**2 

el ordenador le responde con el mensaje de en oí TYPE MISMA1CH KRRÜR 
IN 2fl que significa que en la línea '20 hay un error debido a iratar de operar 
con un tipo de dato equivocado. 

Sin embargo, existen muchas formas de manejar las cadenas, y aunque mu- 
chas de ellas las veremos en el capítulo siguiente, vamos ahora a mencionar una 
operación alt'anumcrica llamada concatenación. l\l resultado de concatenar dos ca- 
denas es otra cadena que ronlirne todos los raracteres de las dos primeras. BJ 
símbolo que se utiliza para representar la concatenación es el signo Vor 
ejemplo, el programa: 

10 Rem concatena) ion 

20 LET fl$a"H0Lfl M 
30 LET W-» PEPE" 
40 LET Cf=A*+BS 
50 PRINT C* 

imprime en la pantalla la cadena HOLA PEPE. Observe cómo en la línea 30 
hemos comenzado la cadena con un carácter de espacio en blanco. Esto evita 
que en la cadena CS las palabras HOLA y PEPE queden de la forma HO- 
LA PEPE. 

Vamos a lijarnos en la diferencia entre el signo * de adición y el signo + 
de concatenación. El programa siguiente trata de ilustrar este concepto. 

10 REM DIFERENCIA ENTPF 3UHR v CONCATENACION 

20 LET A* 12. 6 

30 LET B=r\4 

40 LET Á*» U 12.6 M 

^0 LET B$="7.4» 

60 PPÍNT A+B 
70 PRINT fl$4.p$ 

La línea 60 realiza c imprime la suma de los números 12.6 y 7.4. así en la 
pantalla aparece el número 2fl Sin embargo, la línea 70 realiza e imprime la 
concatenación de las secuencias 12.6 y 7.4, y por ello en la pantalla aparece la 




Hasta ahora hemos utilizado la estructura típica de la sentencia LET, sin 
embargo, muchos de los dialectos del BASIC, v entre ellos el del C-64, admiten 
la palabra claw LET en la sentencia de asignación. I* este modo. 



en el 

IM PF-M UTILIZANDO LFT 

2* LE T flf="PFP£" 

30 LET B*=" VIVE FN " 

40 LET C*="fiR«G0N" 

' ,1 i u ' ñ=s 

r-0 LET B=6 

?9S PRINT Aí+Bí+r* 

print A;"*",B;"*";fl*B 



T0 PFM SIN UTILIZAR LET 

0 A*="PEPE" 

;0 B$=" VIVE EN " 
46 Cí=" APAGON" 

60 B=6 

70 PRINT fl*+B*+C* 

f:0 PPINT Ai :B; "a" .A*R 



Nombres y rangos de las variables 



En general, el nombre de una variable rcs|>ondc a la siguiente estructura; 

XYZ 



Donde X: Ha de ser una letra, de la A a la Z. 

Y: Puede ser una letra, de la A a la Z, o un dígito, del 0 al 9. Pue- 
de omitirse. 

Z: — En variables numéricas reales no se tiene en cuenta, 



Nmlm 




tmerrtilm 


tfifaf 


B 




B- 


- No c lera n. diftit» 


AL 




* 


* \o n Ivirá ni dí S hu 


A5 




a 


(rfXin- 1 . .■ i mn un dígito 


M 




22 


Coíiiiíjuj mn un dígito 


Al» 






No « kin ni dígito 


tM% 






Comicnu mn un di giro 


BS 




BI 


. No es km ni dígita 


bss 




<»> 


( ■ No es letra ni dígito. 


B4S 




IBS 


Comienza un un dimito 



Ftg U Alguno, nombres de mtitUa corréelo, v oír.» .nrorre.lm. 



En la figura 2.3 se exponen algunos nombres correctos y otros incorrectos 
y, en este último caso, el motivo de su incorrección. 

F.l nombre de una variable puede estar formado por más de dos caracteres, 
siempre v ruando el primero sea una Ierra, así al ejecutar: 

10 PEM NOMBRES WKS l 
30 R0Sfl»2 

49 PRINT MflRIO*POSft 

obtendrá un 10 en la pantalla. Incluso es posible darle un nombre de casi otf 
caracteres a una variable. Lo más aconsejable es utilizar nombres de variables, 
ton CUatro a seis caracteres, que nos recuerden para qu£ las empleamos, pero 
no Utilizar nombres demasiado largos que nos cansaremos de teclear y que im- 
pedirán la legibilidad de nuestros programas. 

Además hay que tener en Cuenta que, aunque el nombre sea muy largo, el 
C-b4 sólo reconoce los dos primeros caracteres para identificarla, y así los nombres: 

SUMA 
SU F.l. DO 
SUSANA 
.SUBMARINO 

son Interpretados, por el Commodure, como el mismo nombre de variable SU. 
Recuerde lambiéu Que los espacios en blanco, dentro de un nombre de variable, 
son ignorados por el C-64. A continuación se exponen unos ejemplos de cómo 
se interpretan los nombres largos de variables: 



\ ambir át mmhU 

rll 4Í pif>g"t"lit 


NtpvtnHeio* i*f*«w 
«• ti C h4 


MARIO 


MA 


M ARIO 


NIA 


NOMRKS í 


\OS 


KMtKU - 


£N% 


BNTiftO i % 




H1S33 


Hl 



Y no sólo tendrá que cuidarse de incurrir en errores debido a esta sino que 
además existe una serie de palabra* que no podemos utilizar como nombres de 
variables, pues están reservadas por el Corninodore para las palabras clave y ¡>a- 
ra las funciones (ver Fig. 2.4). 



AHS 


DFF 


00 TÜ 


mu» 


PRIVTi 


SPC 


TI 


AND 


Ü1M 


1F 


NEW 


RtAÜ 


SQR 


TIME 


ABC 


END 


tnput 


NEXT 


REM 


ST 


TU 


ATN 


EXP 


inputi 


NOT 


RESTORE 


STATVS 


TIME) 


CHRS 


FN 


INT 


ON 


RETt'RN 


siEP 


TO 


GLtJSE 


FÓR 


I.KKTJ 


OPF.N 


RICHTJ 


STOP 


LSR 


CLR 


KRK 


I.F.N 


OR 


RND 


STRJ 


VAL 


CMD 


GÉT 


LET 


PEfcK 


RUN 


SYS 


VEBJFV 


CONT 






POKE 


SAVE 


TAB 


WAI 1 


eos 


T 




POS 


SGN 


THEN 




DATA 


COSUB 




PRINT 


SIN 


IAN 





Fig. 2 4 Palabra» reservada» 



Estas palabras reservadas no pueden utilizarse como nombres de variables 
ni tampoco pueden aparecer dentro del nombre de una variable, y si acaso lo 
hacemos, el ordenador nos informará con un mensaje de SYNTAX ERROR. 
En la figura 2.5 se exponen algunos ejemplos. 



ÜMMÉI 


ó»* 


TOLEDO 
DIFERENCIA 
CONTADOR 
SI LIAN 


Contiene la palabra IO 
Cuniirnc la palabra IF 
Connrnr U H'l^ CONT 
Contiene la palabra IAN 



F* 2 5 Ejrmplt» dr n.,mbi« de variable que ...niH-ncn H ul " ü » <«Wl»* 



Otro punto a tener en cuenta cuando utilizamos variables es que el conteni- 
(lo que asignemos a una variable no ex. eda tic los límites que esta variable pue- 
de manejar. f ;Y cuáles son estos límiieh? En cuanto a variables alíanuméncas. 
el número máximo de caracteres que les podemos asignar es de 255. Si sobrepa- 
samos este límite obtendremos el mensaje de error: STRINíi TOO I.ONCJ 
IIKKOR (error por cadena demasiado larga). Claro que este límite sólo lo ¡jo- 
diemos sobrcjxisar concatenando cadenas, pues mediante un LET podemos ¡n- 
iroducír directamente menos de 80 ra raí teres (recuerde que la longitud máxima 
de una línea de programa es de 80 caracteres). 

El contenido de las variables enteras tiene como límites, máximo y mínimo, 
los números + 32767 y —32768. respectivamente. Números fuera de estos lími- 
tes provocarán el mensaje de error: II.I.EGA1, QUAXTITY ERROR Com- 
pruébelo ion las semencias: 

10 PEM SOBREPASANDO LOS LIMITES DE UNR 
VOPIfiBLE ENTEPfl 

PRINTflX 

Incluso para las. variables reales existen unos limites respecto al tamaño de 
l"s números que pueden manejar. Kl límite inferior viene dado por la cantidad 
¿.93873588 E-39. tanto si lleva delante un signo positivo como si es negativo. 
Kl límite superior, tanto para números positivos como negativos, viene marcado 
por la cifra 1.70141183 E-f 38. De este modo, al ejecutar el programa, 

1* PEM LIMITES PE UNR VRPIHBLF PERL 

2* fi=2.??¡?7?587 E-? Q 

30 PPINT fl 

40 fi=-l.?ei41134 

50 PPINT fl 

linea 30 imprimirá un 0 en la pantalla, mientras que la línea 40 generará un 
mensaje de error; ÜVERFLOW ERROR IN 40 (error por número demasiado 
grande en la línea 40). 

Y, para terminar con este recetario, un mensaje de error más. Si en un pro- 
grama le surge el mensaje TYPE MISMATCH ERROR (error por tipo equi- 



vocado de dato), puede que se deba a que ha tratado de introducir una cadena 
en una variable numérica. En una variable alfanumérica podemos introducir 
letras, dígitos, símbolos, etc., pero en una variable numérica, ya sea entera o 
real, sólo podemos introducir números. 

Asignación de contenidos mediante el teclado: INPUT 

La utilización de la sentencia de asignación I.ET, para dar valores a las va- 
riables, conduce a que si deseamos modificar los valores dr las variables tenga- 
mos que cambiar las líneas del programa donde se realiza la asignación, y esto 
cada vez que queramos probar otros valores distintas. Para ev itar esto utilizare- 
mos la sentencia INPUT. 

Fíjese en los programas: 

10 REM PERIMETRO PE UN TRIANGULO 

30 B=5 
48 C=7 

■¡0 PRÍ NT M PER I HETPÜ " ;-B*B*C 

10 PEM PERIMETRO DE CUALQUIER TRIANGULO 
28 INPUT fi 
30 INPUT B 
40 INPUT C 

50 PRI NT "PERIMETRO-" ifl+B+C 

En el primero asignamos valores a lew lados A, B y C¡ de un mangulo e im- 
primimOfl su perímetro. Si queremos calcular el perímetro de otro triángulo ten- 
dremos que modificar las líneas 2$ 30 y 4fl El segundo programa utiliza el 
comando INPL 1. Al llegar el control de ejecución a la línea 241 aparecerá un 
símbolo de interrogación r en la pantalla, con el que nos indica que está espe- 
rando a que tecleemos un número y pulsemos la tecla RETURN para que él 
lu lea. Lo mismo pasará en la línea ÍS0 y después rn la 4fl Tras pulsar el último 
RETURN, el C-64 imprimirá en la pantalla el perímetro del triángulo. Con 
este programa podemos calcular tantos perímetros de triángulos como quera- 
mos y sin modificar ninguna línea. Cómodo, ¿no? 

Pero imagínese que está escribiendo un programa para que lo utilice la se- 
cretaria de una gran empresa, y que ésta tuviera que introducir gran cantidad 
de información mediante los INPUT que usted ha pucst<\ por ejemplo, los nom- 
bres, la dirección y el teléfono de los clientes, o las compras o ventas de la « ma- 
na. Suponga además que en medio de la introducción suena el teléfono o se 
va a tomar un café, ¿cómo se acuerda de en qué INPUT se quedó?, ¿en el lado 
B del triángulo?, ¿en el segundo apellido del quinto diente? Para resolver esto 
se utilizan mensajes en el INPUT (en este sentid» es bastante parecido al PRINT). 
Modifique el programa anterior para convertirlo en: 

10 REM INPUT CON MENSAJES 
20 INPUT "TECLEE EL PPIMEP LflDO'SR 
30 INPUT "TECLEE EL SEGUNDO l.flDO";F 
4@ INPUT "TECLEE EL TERCER LflDO";C 
50 PRINT "PERIMETRO 3 " í fl+B+C 



Observe cómo los mensajes van separados de los nombres de variables me- 
diante el símbolo de punto y coma. Ahora, cuando ejecutemos el programa, irán 
apareciendo mensajes, indicándonos qué tipo de respuesta se espera que teclée- 
nlos. Si nos equivocamos en la introducción y tecleamos una serie de letras, en 
lugar de un número, y pulsamos RETURN, el ordenador nos informará con 
ef mensaje REDO FROM START, pero no se interrumpirá la ejecución, sino 
que volverá a presentarnos el INPUT en el que nos hemos equivocado, para 
darnos otra oportunidad. 

Podemos utilizar un INPUT para introducir varios datos, por ejemplo: 

1* REM INPUT MULTIPLE 

70 INPUT "TECLEA LOS t flpns R.p V C'WR.B-C 
30 PRINT "PERIMETROS. R+p+r 

tn csie caso podemos responder de dos formas: 

a) Tecleando los tres números sucesivamente, separados por comas, y des- 
pués pulsar RETURN 

b) Tecleando el primer número y pulsando RETURN, y así sucesivamente. 
(En este caso, cuando nos pida el segundo y tercer número, el C-64 imprimirá 
en pantalla dos signos de interrogación.) 

Si estamos en el caso a) y en lugar de responder adecuadamente, por ejem- 
plo. 2, i, 4 RETURN, escribimos más respuestas de las necesarias, por ejem- 
plo 2, X 4, 5, 6, 7, 8, RETURN, el ordenador nos sacará el mensaje EXTRA 
IUNORED y utilizará solamente el trozo 2, 3, 4 como respuesta al INPUT. 



— Podemos utilizar un INPUT para pedir varios datos, pero si ponemos 
más de un mensaje en un INPUT, obtendremos un mensaje de error 
ÍSYNTAX ERROR). 

- Si en un INPUT múltiple nos equivocamos y tratamos de introducir 
un contenido alfanumórico en una variable numérica, obtendremos 
el mensaje REDO FROM START y el ordenador nos vuelve a pedir 
desde el primer dato del INPUT múltiple. 



También podemos utilizar el INPUT para asignar contenidos a variables 
alf.muméricas. Compare el funcionamiento de los dos programas siguientes; 

19 PEM DIRECCIONES 

INPUT "COMO TE LLflrWs";ft* 
m INPIJT " DONDE VIVES".** 
40 PRINT VIVE EN ";B* 

10 PEM DIRECCIONES 

20 PPINT "COMO TE I IRMAS"; 

39 INPUT R* 

40 PPINT «BONDE VIVES "i 
50 INPUT Bí 

PPINT ftfe:- VIVE EN n» 



utilizar PRINT para escribir mensajes 



Sin embargo, hay que tener cuidado con la longitud de los mensajes, 
pues si superan la de una línea de la pantalla, el ordenador tomará como 
respuesta no sólo lo que usted haya tecleado, sino también el contenido 
del mensaje. Por otra parte, procure no teclear respuestas demasiado lar- 
gas. Si su respuesta es más larga que la longitud de dos líneas de la pan- 

íafdos' 13 PaTO ^ 18 reSPUeSla 6XCeda ^ 



Como resumen, podemos decir eme el formato general de la sentencia 
INPUT es: 



TNPUT -lista de entrada» 



Lista de entrada: Puede estar formada por diversos nombres de varia- 
bles separados por comas. También puede llevar un mensaje delante de 
las variables (este mensaje ha de ir separado de las variables por punto 
y comal. Si tras la palabra INPUT no se coloca ni siquiera un nombre 
de variable, obtendrá el mensaje de error «SVNTAX ERROR». 



Si alguna vez, estando la ejecución en un INPUT, desea interrumpir el progra- 
ma, pulse enérgicamente y a la vez las teclas RUN/STÜP y RESTORE. 



BUCLES Y CONDICIONES 

Hasta ahora lodos los programas que hemos visto pertenecen a los que lla- 
man programas lineales. Cuando ejecutamos (RUN) el programa, el ordena- 
dor cede el control a la primera línea, mando ésta ha finalizado cede el control 
& la segunda, y así sucesivamente hasta que ejecuta la última linca del progra- 
ma. O sea que, de este modo, para rada acción individual necesitamos una lí- 
nea de programa. Compare los dos programas siguientes: 

19 REM PROGRflMfl ' iNEfH 
1 20 Rf«"MF I LAMO TflR:w 

3@ PRINT ttt 
I 49 PPT NT 8$ 
y =iR PRINT Hí 



10 PPM BUCLE INFINITO 

20 R$="riE timó Tflp;:*N" 

; :0 PRINT Rí 

40 m TO 30 



Con el primer programa necesitamos tres líneas para escribir tres veces la 
variable AS. Con el segundo «-remos pasar por delante de nuestros ojos líneas 
\ líneas de pantalla con la frase -ME LLAMO TARZAN», v esto lo hemos con- 
..guido sólo con dos líneas. (Cuando se canse pulse la tecla RUN/S'IOP.) La 
razón se debe al comando GO TO 30 que aparece en la línea 40 GO lO 'M 
significa «vete a la línea 3ft». Así que cuando el control llegue a la línea 40 ésta 
cederá el control a la linca 30 que tras ejecutarse, pasara el control a la línea 
siguiente, la 4(4 y así sucesivamente. Quizá esto le parezca un poto inútil, pero 
hemos aprendido a desviar el control de la ejecución a la línea que queramos 
v a poder repetir una acción. 

La estructura general de la sentencia GO TO es: 



GO TO «núm. de linea» 



Núm. de linea: Este número ha de coincidir con el de alguna linea 
del programa, s¡ no obtendremos el mensaje de error: UNDEF'D 
STATEMENT ERROR 



Sentencia IF...THEN 

Claro que repetir una acción sin tener ninguna forma de controlar el númc- 
i" di veces que la vamos a repetir no es algo muy interesante. Para conirolar 
« sio. y muchas otras cosas, disponemos de la sentencia IF. r'íjese en el progra- 
ma siguiente: 

te PFH üTlLIZflCION DE IF 
20 «=0 

:u PRINT"! n VAMOS fl ESCRIBIR DIEZ VECES" 
4 13 PPINT 
R=R* 1 

*n ppint-ME LlRtin TflRZRN" 
7* IF «MO THFN QCi TO 5* 

PPINT 
9Pi PPINT"VR ESTA" 

Este programa imprimirá 10 veces en la pantalla la frase «MK LLAMO TAR- 
DAN-. La línea 20 es innecesaria, pero no es malo que nos acustumbrernos a 
inicializar las variables que vamos a utilizar en el programa. Después, en la lí- 
nea 50 aumentamos el valor de A en una unidad, y en la línea 60 imprimimos 
por primera vez la frase deseada. La línea 70 compara el valor de A con el nú- 
mero 10 Si A (que es el número de veces que hemos escrito la frase «ME LLA- 
MO TARZAN-) es menor que lfl la línea 70 nos devuelve a la línea 50 para 
volver a imprimir la frase. Si A es 10 o más. ya hemos imprimido 10 veces la 
frase descada y el control pasa a la línea 80 y después a la 90 

En este programa se introducen varios conceptos muy importantes. El pri- 
mero es el concepto de contador. La variable A, en el ejemplo, es un contador, 




pues con ella llevamos la cuerna del número de veces que imprimimos la frase. 
El segundo concepto es el de bucle condicional, si la comparación A < 10 es cierta 
volvemos a repetir el bucle. Si es falsa, el control pasa a la línea 80 y el progra- 
ma finaliza en la línea 90 

La estructura de la sentencia IF es la más complicada y la más importante 
de las que vamos a ver. Muchas otras son variantes o adaptaciones de esta sen- 
tencia. Por ello es muy importante que domine esta estructura de control antes 
de pasar al apartado siguiente. FJ formato general de la sentencia IF es de la forma: 



IF «expresión- -relación» «expresión» THEN «acciones". 



Expresión: Representa cualquier constante o variable, ya sea numérica 
o alfanumérica, y cualquier expresión, ya sea numérica o alfanumérica. 

Relación: Es cualquiera de las operaciones relaciónales que se muestran 
en la figura 2.6. 

Acciones: Son las órdenes que habrá que realizar en caso de que la 
comparación sea cierta Por ejemplo. PRINT. o GO TO. o cualquier 
otro comando del BASIC, incluso oirá sentencia IF. 
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Si la expresión condicional que hay dentro del IF (-expresión- -relación- 
«expresión»') rs cierta; se realizan las acciones que hay detrás del comando THEN 
y después, a menos que estas acciones indiquen lo contrario (por ejemplo, me- 
diante un GO TO). se pasa a la línea siguiente. Si la expresión condicional es 
falsa, se ¡gnorá el contenido del THEN y se pasa a la línea siguiente. 

10 PEM SIGNO DE LOS HUMEROS 
— 28 PPINT\T 

INPUT "TECLEA UN NUMERO" «fl 
3 40 IF A<« THEN PRINT h;"ES NEGATIVO" 
3 51? IF P=* THEN PRINT H • " ES NULO" 
□ 6* IF R>0 THEN PRINT ff; "ES POSITIVO" 
7# STOP 
ftfl GO TO 29 



En la línea 20 observará con extrañeza ese corazoncillo dentro del contení- 
do del PRINT. Este símbolo representa la acción CLR, y cuando el ordenador 



|o encuentra dentro de un PRINT. limpia inmediatamente la pantalla. Para ob- 
tenerlo, tras oulsar las comillas, mantenga pulsada la tecla SHIFI" y pulse una 
v^z la tecla CI.R. Fíjese en línea 4*3 Si el número que ha tecleado es negativo, 
la expresión relacional A< Osera cierta y se pasa a realizar el contenido del co- 
mando THEN. Si es falsa, el control pasa a la línea siguiente. En la línea 7tí 
nos encontramos con un nuevo tipo de instrucción, la sentencia STOP. Este co- 
mando provoca una parada temporal del programa y en la pantalla aparece el 
mensaje BREAK IN 70 (interrupción en la línea 70). Si introducimos la pala- 
bra clave CONT (CONTINUAR) el ordenador pasara el control a la línea si- 
guiente a la que provocó la parada, esto es. a la línea flft la cual envía el control 
j la lítí qur se encarga de limpiar la pantalla, y el programa volverá a empezar. 

Por qué hemos incluido la sentencia STOP? Si no lo hubiéramos incluido, la 
línea 80 cede el control a la 20 y ésta limpia la pani.nl i antes de que nos dé 
liempO ■ leer el mensaje provocado por la línea 40 5ft ó 60 Kl íoniialo general 
dr los dpi nueviis comandos es liaMante sencillo. 

STOP 
CONT 

Bueno, menos mal. 



LINEAS MULTI SENTENCIA 

Considere el ejemplo siguiente: 

10 PFM ORDENACION DE NUMEROS 
20 PRINT "73" 

^ INPUT "TECLEA "N NUMERO" '• X 
4n INPUT "TECLEA OTRO NUMERO" ¿V 
Vi PRINT PPINT PRINT 

60 IF X<V THEN PRINT X. "ES MFNOR QUE";V 
7* IF X*V THEN PRINT X;"ES IGUAL ME" IV 
86 IF X>V THEN PRINT X."ES MAYOR QUE"; Y 
90 PPINT -FRINT PRINT 

100 PPINT "DESEA VOLVER A EMPEZAR. TECLEE" 

110 INPUT "S 0 N V PULSE RETURN" . A* 

120 IF H$="S" THEN GOTO ?0 

130 IF ft*<> , 'N" THEN PRINT "3" = 00 TO 160 

140 PPINT "SE ACABO" 

150 END 

Ln las líneas 30 y 40 nos encontramos con la primera novedad: varias órde- 
nes en una misma línea. Kn este caso se debe a que queremos dejar tres líneas 
en blanco antes de volver a imprimir, y por ello introducimos tres comandos 
l'RINT en una línea de programa. Observe que los tres comandos van se| 
dos por símbolos de dos punios- listo recibe el nombre de lint 
V en una línea podemos poner tantos comandos, separados por ¡ 
puntos, como quepan en dos líneas de la pantalla (esto es, una línea de progra- 
ma puede ocupar, como mucho, dos líneas de la pantalla). 



Sin embargo, mediante un pequeño truco podemos introducir lineas de 
más de 80 caracteres. 

Como puede verse en el apéndice de «Palabras clave», podemos teclear 
ciertas abreviaturas en lugar de las palabras clave. Asi. en lugar de la pa- 
labra clave, PRINT podemos teclear un símbolo de interrogación ? Cons- 
truya la linea de programa. 

10 ?A: ?A: ?A: ?A: ?A; ?A: ?A; ?A: ?A; ?A: ?A: ?A: ?A: ?A: ?A: ?A: ?A: 
?A; ?A: ?A: ?A: ?A: ?A; ?A: ?A: ?A 

y pulse RETURN. Ahora introduzca el comando LIST y verá aparecer una 
linea de programa que ocupa más de cuatro lineas de pantalla, más de 
160 caracteres. Curioso, ¿no? 



Otro punto importante, del programa anterior, es cómo se utilizan la* lí- 
neas 100 a 130 para preguntarle si desea volver a ejecutar rl programa. Este ripo 
de construcción es extremadamente útil, así que es aconsejable que la estudie 
detenidamente. Entre las líneas 100 v 110 se le pregunta al usuario si desea vol- 
ver a ejecutar el programa y se le indica que debí* responder tecleando una S 
(para sí) o una N (para no) y pulsando Rr.TURN La línea 120 comprueba si 
ha pulsado la S y, en este caso, le devuelve al prim ;ipiú del programa. 1.a línea 
1Ü0 se encarga de controlar que no pulsemos respuestas distintas de S o N. Si 
acaso pulsó la N. el programa llena a la línea 150 donde nos encontramos con 
otro (ornando del BASIC, el comando E NI) ( l'IN). La finalidad de esta palabra 
clave es bastante parecida a la del S'IOK Ksto es, cuando el programa llega a 
ella se para la ejecución y, en este caso, aparece el mensaje RLADY. indicando 
que ha llegado al final del pmgrama. Ll comando KM) se utiliza para señalar, 
dentro del programa, en qué lugar termina este, y es importante utilizarlo por- 
que mejora la legibilidad de los prójimas y porque, «orno veremos, evita que 
surjan errores. Sin embargo, si teclea el comando CONT y existen más líneas 
tras la que contiene el F.NI), la ejecución del programa continuará por la línea 
siguiente. 

F,s necesario volver a considerar cómo interpreta el ordenador la expresión 
relacional situada detrás del IF. Va liemos dicho que si la expresión relaciona! 
es cierta, se pasa a ejecutar el contenido del THEN y se cede el control a la 
línea siguiente, l'ara el ordenador, una expresión relacional sólo puede tomar 
dos valores: cierto o falso. Si es cierta, el ordenador le asigna un -I, y si es falsa, 
le asigna un W Por ello, el resultado de la orden: 

PRINT (¿>3) + (l<2) + (2 + 3 = 5) 

es un -2. I.a expresión (2>3) es falsa y, por tamo, le corresponde un 0 Las ex- 
presiones (I <2) y (2 + 3 f>) son ciertas y por ello el ordenador les asigna el valor 
-1. Así, la suma de 0 + (-1) + ( I) da como resultado un -2. Esta evaluación que 
realiza el ordenador de las expresiones condicionales es muy útil en la progra- 
mación. En el ejemplo siguiente se utiliza esta valoración para hallar el mayor 
de dos números. 

10 PEM MPVrm' DF DOS HUMEROS 
2# INPUT "TECLEE UN NUMERO" ¿R 
50 INPUT " FECLEÉ OTRO NUMERO" ;B 



40 PRI NT : PfciNT £RIÑT 

50 PPÍNT TPp(7>: "EL MRVOP ES" i -R*í fl>B 
B*'fK=B> 

68 ÉND 



Si A>B la expresión -A-(A> Bl -B-(A< =B) se convierte en - 
AM-U-B-(0> = A. Si A< =B, la expresión A-(A> B) - B-1A< =BI 
se convierte en -AMO) - B-( -1)=B 



Usté concepto es mucho más útil de lo que pueda imaginar ahora. Pero mien- 
tras tanto vamos a ver una aplicación que en principio parece más interesante. 
Y.iim.s a diseñar un programa que sirva para calcular la nota media de una clase: 

\v> PEM NHTR MEDJR 

20 iNPMT-nirWFC'C. Rl NtlMOS'' .N 

3* SUMH=ia 

PRIN1 "7 EH EF I R NUTR DEL " . C ; "RLUMHlt"; 
k« INPUT NO 
7* SliriR=SMMR+Ni'l 
:n PRINT "D" 
98 JF t<H THEN 4Q 

lPiíi PRIN7 "Lfl NftTR MEDIR DF L0S";N; 

"RLUHNO-. ES'SSUfWN 
M0 END 

hste programa sirve para hallar la nota media de cualquier clase, ya que el 
numero de alumnos, N. lo tenemos que introducir en la línea 2tí Otro concepto 
importante a recordar es el concepto de contador. Utilizamos como contador 
•1 la variable C y ésta va aumentando de 1 cu 1 (línea 10) hasta que llega al 
tamaño de la clase, N (línea 90). Con este programa puede hallar la nota media 
de una clase, va tenga ésta 2t\ 1(4 IW» ó I00O alumnos. Fí jese, además, en ta 
uttliza< ion de fa línea 50 para que nos indique el número del alumno cuya nota 
tenemos que introducir. Adicional mente, en la línea 90 observamos cómo la sen- 
leneia THKN GO TO 40 puede abreviarse con la sentencia THEN 40 



La senté 


ncia THEN GO TO «núm. de linea», puede abreviarse me- 


diante: 






THEN «núm. de linea» 


0 media 


rite: 

GO TO «núm. de linea» 



El comando GET 

Escc comando es otro de los utilizados, al igual que INPUT. para introducir 
datos desde el teclado. Sin embargo, su funcionamiento es bastante distinto. 



Cuando el control llega al GET, éste revisa el teclado, y si pulsamos alguna íc- 
ela, irata de introducir el carácter correspondiente en la' variable que va a conti- 
nuación del GET. El formato general de esta palabra clave es: 



GET «nombre de variable 



Nombro de variable. Puede ser: 

a) Variable arfanumérica, por ejemplo, N$. 

b) Variable real, por ejemplo, N. 

cí Variable entera, por ejemplo. N%. 




Por ejemplo, al ejecutar el programa: 

10 REM CARACTERES ÓffPlEHDO 
20 GET N* 
30 PRINTN* 

40 ÓOTO 20 

Cuando el luiiuol llega a la línea 2\\ el comando GET hace una revisión 
del (fi lado e introduce la iCCiM que hayamos pulsado en N$. Después, la linca 
neníelo de N$ y la línea 40 devuelve el control a la línea 2ft 
dizar una revisión del teclado, etc. Observe que toda esta ope- 
casi instantáneamente y. por tanto, es bastante dtfú il que us- 
: de pulsar una tecla cada ve/ que v real i/a una revisión del te* l.idn. 
'or ello, la mayoría de las vci es, ruando se ejecute el <¡KT, usted mi habrá pul- 
sado leda alguna y GET introducirá un vatio en \S y después la línea '.W im- 
primirá un vacío (es decir nada) en la pantalla. Por esto es por lo que usted ve 
cómo los caracteres que ha pulsado van corriendo hacia el borde superior de 
la pantalla. Para evitar esto podemos modificar el programa anterior en la for- 
ma (para parar el programa pulse la tecla RUN'STOP): 

10 REM DETECTA CARACTERES 

20 GET NÍIF N*f - " " (JOTO 20 
PPIHT Ní 
no T0 ?0 

l,a modilirat ion en la línea 2tí nos asegura que el control NO (asará de esta 
línea, a menos que pulsemos una tecla de carácter. Con este programa aparece- 
rá un carácter en cada linca de pantalla. Si quiere escribir en una misma línea, 
basta con añadir un punió y coma al final de la linca 3tí Escriba de esta forma 
y después estudie que es lo que pasa si pulsa las teclas de acción DEL. CLR, 



El nombre de variable que aparece en el GET puede ser el de una 
ble numérica real o una entera, por ejemplo. GET N o GET N%. Pero 
en este caso ¡ 
pulsemos i. 
ERROR. 



LoS oPEHADOMS DE BOOLE 



Podemos sofisticar aún más Ihs expresiones relaciónales que acabamos de 
ver utilizando los llamados obradores de Boolc. Estos se representan mediante 
l.v, palabras NOT (no). AND (y) OR (o), y sus niveles de prioridad se expresan 



en 







N<jr 
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ANO 
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OR 


1 



l m i.l. Opcradom de Boolc 

Bueno, y ¿cómo se utiliza esto? Quizá lo mejor es estudiar las llamadas -labias 
ríe verdad*. Suponga que tenemos dos rxpresiones condicionales A y B (observe 
que A > B serán expivsioni-s del Njto - Nr\1F.R< Xa»; -X+Y< >?>., AS-BS, 
ele ) Para concretar, íuiagineuios míe A es el suceso «léngo coche* (puede ser 
i Irrtl 0 lalsa). que B es el suceso -l. ngo dinero-, y supongamos un lercer suct- 
C- ^Me voy a la sierra-. Así la expresión: 

IF A THEN C 

significa: -Si tengo COchc, entonces me w»y a la Hierra-, y la expresión: 

Ir B THEN C 



Si tengo dinero, entonces m 



<ompu<stas. 
i A AM) HKN C 



f Considere ahora 



Km a sentencia la podríamos traducir por: -Si tengo coche y tengo dinero, enton- 
ces me voy a la sierra." Esto indica que me voy a la sierra sólo si tengo roche 
y si tengo dinero, es decir, para poder hacer C han de ser ciertas A y B. Sin 
emUirgo. la sentencia: 



IF A OR B THEN C 



indica que: -Si tengo coche o bien tengo dinero, rntonea me voy a la sierra.» Esto 
es. en este caso, me voy a la sierra si bien li ngo coche o si sólo tengo dinero, 
y si se cumplen las dos. mucho mejor, con mayor motivo me voy a la sierra. 

Resumiendo, el conectivo AND implica que para poder realizar C han de 
cumplirse tanto A como B. mientras que con el conectivo OR lwsia con que 

' ilas 



se i umpla o bien A. o bien B, o ambas. Esto se resume ei 

de verdad. 



as siguientes tal 
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Más sem illa de explicar y. yene raímenle, rnás dtlii.il de observar dónde se 
ha de Utilizar es la partícula NOT. Suponga que el suceso A es -Hay patatas*, 
y G el suceso «Compro dos kilos». Así, la sentem i.r 

IF A TH EN C 

indica: «ái háy patatas, entonces Compro dos kilos.» Imagínese ahora un sin i-mi 
U= «Me voy a otra tienda», y ilc este modo podemos escribir 

IK NOT (A) THEN 1) 

que Minifica: "Si no hay patatas, entonces me voy a otra rienda.- Fácil, ¿no? 
I.s decir, NOT (A) es el suceso conmino de A. Claro, es difícil ver cuándo ni» 
interesa más escribir, por ejemplo, «X< >'S»á N0T(X-3), pues ambas expre- 
siones reflejan lo mismo. «X es distinto de 3-, o -No se cumple (pie Xsca igual 
a :t«. I.a tabla de verdad de la panícula NOT se expresa en la siguiente figura: 



A 


NDI (A) 


Cirru 

ta* 


FoIm 

Cirru 



r i< ¿M Tabla .Ir wnla.» la p-iitrula NI7I 



Ahora, lo mejor es rel'researnos un pino y repasar las idea> tecleando el ejemplo 

HÍRuiénte: 

10 PFM CflLIFICfiCION 
2* PRINTTl" 

3« IHPUT "NOMBRE DEL RLUNNO" j'Nt 
4* PRINT : PRINT" NOTA DE M ;N$: 
50 INPUT N 

66 IF N<e OR N>10 THEN PfrTMT"» 00 jn 4B 

70 PRINT: PRINT: PRINT 
30 IF NQTCNCS) THEN '=00 

90 PRINT H$i " NO HA SUPERADO FL EXAMEN " 

100 PRINT "EN SEPTIEMBRE LE IPR MEJOR" 

110 PRINT i PRINT PRINT 

1?0 PRINT "DESER VOLVER fl rMPEZRP" 

130 PRINT "PULSE LR N 0 Lfl S" 

140 GET R$:IF PS="" THEN 140 

150 IF R*="S" THEN 20 



IF N0T<:RÍ="N" > THEN 140 
,70 PPINT"HASTA OTPA" 
iñ0 FND 

300 PRINT N$;" HR SUPERADO EL EXAMEN. SU 

CRLIFICRCION HR SIDO DE 
VI* IF(N>=5>RNPfN<7>THEN PP 1 NT " APROBADO " 
320 IF<N>-7>RND<N<9>THEN PP I NT "NOTABLE" 
J30 IF<N>«9)ftND< N<1 0) THEN PRINT 

"SOBRESALIENTE" 
348 IF N=10 THEN PRINT"MATRKMLH DE HONOR" 

00 TO 110 

De acuerdo, de acuerdo, la construcción es algo artificial, pero es que es dt- 
lú il reunir las tres partículas en un ejemplo lan sencillo Es obvio que en lu^ar 
de la línea 80 podríamos haber pueslo: 

80 IF N>-5 THEN 300 

Pues araba indican lo mismo. O que en lugar de la línea IT>0 podríamos haber 

ocrito: 

l")0 IF RS < > "N" THEN H0 

PeiU ctta nos ¡Untra que existen muchas humas de escribir lo mismo, De ahora 
di .nielante lo que hemos de intentar es escribir del modo unís lógico y simple. 

( >ttos dos puntos deslacablcs en el parama anterior es c ómo ulili¿amos 
la linea 6tf para tratar de evitar que el usuario introduzca una nota fuer» del 
rango de 0 ■ 10 y cómo las Kneas 150 y 160 se encargan de que sólo podamos 
responder ion una S o ron una N. 



La sentencia ON GO TO 

F.n mudias ocasiones utilizamos la sentencia IF... THEN ¡>ara comprobar 
m una variable liene cierto valor: y en ese caso enviamos el control a cierto nú- 
mero de línea (C.O TO núm. de línea). Por ejemplo, considere el programa: 

19 REM RAMIFICACION 

?e PRINT "PULSE UNA TECLA DE! 1 FU V 
39 GET N%¡ IF N5Í-8 THF.N W 
4?. PRINT "H" 

56 if n::=i thfn \w 

50 IF N5í*2 THEN 159 
IF NX=3 THEN 2O0 
30 IF Nr , :=4 T hEN 

IF N5Í=5 THEN ?-W 
3»e nn Tn .--n 

199 PRINT "AGORERO" '■ 00 T0 20 



1f=.0 PPINT "PUSILANIME" : 60 T0 20 
2m PRINT "ESNOPTAO": GO TO 29 
250 PRINT "MALA TE" - GO TO 20 

PPINT "REGUETESALAO" : 00 TO ?0 

De este modo, el mensaje que obtengamos dependerá de la tecla numérica 
que púlsemOS. Si pulsamos nn¡i reda numérica distinta del 1, lí. 3, 4 ó 5, la línea 
90 nos devolverá a la línea 20 Si pulsamos una teda »o numérica obtendremos, 
un mensaje de error. Observe la estructura de la línea 3<A La coni|iarai ión N^í = 0 
se debe a que cuando el GET es numérico y no pulsan»* léela alguna, el orde- 
nador introduce un 0en N%. Con esta comparación aseguramos que miemras 
no pulsemos una leda cJ control no pasará ele la línea 3fl (Si pulsásemos la tecla 
0 introducimos también un tí en Pues bien, este tipo de ramificación (que 

se dirige hacia un número de línea según el número que hemos pulsado) es tan 
típica que el C-64 incorpora un tipo de estructura particular para este caso: la 
semencia ON...G0IT3; Podemos modificar el programa anterior en la forma: 

10 REM RAMIFICACION 

20 PPINT "PULSE UNA TECLA DEL 1 AL 5" 
30 get h:<- IF N:>0 THEN 30 
40 PPINT "T 

50 0N NK 00T0 100.150-200.2^0,300 

60 00 T0 SQ 

100 PPINT "AGORERO" ' 00 T0 .?0 
110 PPINT "PUSILANIME" ¡ 00 T0 20 
l c -0 PRINl "PUSILANIME" : GO T0 20 
200 PRINT "ESN0RTA0" : 00 T0 28 
250 PPINT "MALA JE" : G0 T0 20 
300 PPINT "REQUETFSAl A0" : 00 Tí i 20 

Ac|uí, la linea >tf requiere la luayui atención. Bita lim a suple a las líneas 
50 btt 7tt HW y <>W del prógiama anterior. Kl significado es que si N% vale I, 
2, II, 4 ó 5 el control se cederá a las líneas 1W I.ífl 20ft 2 50 ó '[0tt respei idamen- 
te. Así. la rslniclura general es: 



ON «expresión» (KTIX) «I" núm. de línea. 2° núin. de línea... - 



Expresión: Tal como A o A + 4, que el ordenador evalúa y toma la parte 
entera del resultado. Si el resultado es 1, se cede el control al primer nú- 
mero de linea de la que hay tras él GOTO. Si el resultado es 2. al segundo 
número de linea, y asi sucesivamente. Si hay cinco números de línea tras 
el GOTO, entonces expresión puede tomar valores del 1 al 5. Un valor 
de expresión fuera de este rango ocasionará que el control pase a la línea 
siguiente a la de la sentencia ON...GOTO. 

Aunque es correcto escribir el comando GOTO con un espacio en blanco 
intermedio, esto no se admite cuando forma parte de la sentencia 
ON...GOTO, y el C-64 le avisara mostrándole un mensaje de SYNTAX 
ERROR. 



PRACTICANDO 



Antes de continuar es conveniente realizar una revisión de los conceptos. 
Si se trata de conceptos de programación, no hay nada mejor que intentar cons- 
truir programas, asi que ¡adelante! Antes de leer la solución propuesta trate 
j, obtenerla, personalmente, con la seguridad de que aprenderá mucho más 
a $f que revisando el programa listado en el libro. 

Kn primer lugar, imagine que vamos a realizar la elección de -MISS COM- 
MODORE-. El ordenador nos irá preguntando por el nombre, talla y peso de 
U> (.andidatas. y nos indicará si han sido admitidas o rechazadas. Claro que 
c l ordenador no tiene criterios para relacionar, así que le indicaremos que han 
de medir entre 1.65 y 180 metros y han de pesar entre 43 y 60 kg. 

10 REM MISS rOMrlOriOPE 

11 PEM 
1? PEM 

15 ppint "rr 

20 PPINT : PPINT T NPI 'T " NQMBPF " I H í 
30 PPINT PPINT INPUT H TAI l.fi" \ T 
40 PPINT-PPINT : I NPI.IT "Pl- SO" ¡P 
50 IF TO.63 0R 01.89 QF fQGto 0R RC43 
THEN PPINT "[TOWFECHAZAPA" , GOTO 70 

68 ppint ".THniwpBrniTinA". 

70 PPINT " LA iflNIHIiATA " :Nf 

100 PRINT ' PRINT : PRINT PRINT 

"OTRA CANDI PATA (RESPONDA SI 0 NOV'J 
110 INPUT C$ 

115 IF C*0"3I" AMD C*O""0" THPN 

PRINT"«WFEfiP0NDA SI 0 NO" 0 OTO 100 
120 IF Cf=»si" THEN 15 

130 ppint "nnm«m^m^nmm9m¥íH RE"-» 

" LA SELECCION" 
14* END 

Fíjese en los símbolos que aparecen dentro de los PRINT de las líneas 19, 

0Ü 113 y l'M Hay tres tipos de símbolos: el corazón [51 • de ' que V a hemos 
hablad?»; una espeiie de '<q» . y un símbolo de corchen □ Kl r< 
presenta la acción CLR, la O esCRSRi.yel Q] es CRSR-». Cuando pul- 
samos las teclas correspondientes, dentro del símbolo de comillas (ver el capítulo 
1.1. aparecen estos símbolos, y cuando el ordenador va a ejecutar el PRINT, rea- 
liza la acción que le indica eí símbolo correspondiente. Con ello podemos escri- 
bir en el lugar que queramos de la pantalla y presentar nuestros resultados de 
una forma clara y ordenada 

El resto del programa no aporta mucho más, a menos que usted se decida 
a incluir en la selección sus preferencias personales (por ejemplo que sea rubia, 
ojos verdes, etc.). ¿Qué le parece obligar al ordenador a que acepte a la candi- 
data COMMüüüRE sea como sea (es la hija del jeie)? 

El programa siguiente puede ser una fuente para que usted desarrolle pro- 
gramas educativos para jugar ton sus amigos o hijos. Esta sencilla estructura 



inicial Sirve para repasar una tabla de multiplicar. El C-6-í le pregunta qué nú- 
mero desea repasar, línea 4ty y lias aceptar su respuesta, por ejemplo, el 8. em- 
pieza a plantearle preguntas en la forma: 

8 • 1-? 

Aluna lia de teclear su respuesta, en este caso 8, y pulsar RfcTTL'RN. El Com- 
modorc le indicará si ha acertado o faltado y Ir mostrará la respuesta correcta. 
Si el número de aciertos es mayor o igual que 7, podra pasar a otra tabla, si 
no tendrá que repasarla de nueva 

13 RFM TABLAS DE HULTlPLICflR 

ti reM 

V? PEM 

20 PFM R«ACIERTGS 
30 PPINT "T 

40 TNPMT "QUE NUMERO DE SER REPHSBR" ! N 

50 ¿«1 A=0 

150 PPIHT PPFHT PPT NT 

7«d PRÍNT N¡ "*" ;C "=" ¡ 

81? INPUT P 

qiíj ip. p=.N*C THEN PPIHT Tftf¡í9>¿ "BIEN"; i fl*fl+1 
100 IF ROH*C THFN PRINT TfíB<9> "HRL* ¡ 
110 PRINT N; M *";r;"=".¡N*C 
120 OC+1 . 

130 IF p<«Í0 THEM 68 

140 IF B<? THEN PRINT M MUV MAL. riENE "+ 

" QUE VOLVER fl REPflSflRLfl" GOTO 50 
150 PRIN1 "BIEN. DESEA PFPASAR OTPA"+ 

" TABI R<S/N> H 
160 GFT P$:iF P*0"S" AND P*0"N" 

THEN 160 

170 TF R**"S" THEN 30 
1A0 PRINT "^[PlPWTíTCJfl" 

130 PRINT TRB< 1 5> > "HASTA OTRR" 

Intente introducir la siguiente variante: si se fallan dos respuestas consecu- 
tivas, el ordenador nos obliga, inmediatamente, a repasar la tabla. 

Como ejercicio final, suponga que el ordenador es una tienda de comesti- 
bles y que usted es el cliente que va de compras, Ln el almacén hay una serie 
de productos, por ejemplo, macarrones, spaglietlis y tallarines. El vendedor tiene 
que saber en rodo momento cuál es el precio de sus productos y qué cantidad 
ele cada uno de ellos tiene en el almacén. Ñus preguntará sucesivamente qué 
producros deseamos y tras comprobar que tiene suficiente para servirnos nos 
pasará la cuenta final. Procure que nadie pueda engañar al dependiente. 



10 REM DIA DE COMPRAS 

20 REM PVGÍ*PSti,PT¿j SON LOS PRECIOS 



30 PEM TM,TS,TT, SON LAS EXISTENCIAS 
40 REM CM.CS.CT, SON LRS CANTIDADES 
COMPRADAS 

56 pm:-;=90.ps>:=i^0 i&fk*m 

£0 TM=24.5:TS=37.5:TT=20 
©8 PEM 

89 REM 

90 PEM PROGRAMA PRINCIPAL 
ÍM PEM 

92 REM 

1 00 pp i nt xmwmwmm" 

110 PRINT TflE< 1 2 > • "TilH íiF r.ÑMPW 

120 PRINT PRINT PPINT 

130 PPINT " PAPA COMPRAR Pl "1 SF l A THXA C" 

140 f.fT Af: IF fllOX" THEN 140 

1 50 ppint "vnmmnm" 

160 PPINT TAB' 10> ¡ " ? QUF DESEA COMPRAR?" 
170 PRINTPPINT TflB< 14> ; "1 . MACARRONES" 
180 PPINT: PPIHT TAB<t4>:-"2,6PtiGUCTÍ$l' 
15*0 PPINT PPINT TAB04) ;."3. TfiLLflRINES 1 ' 

200 PPINT PPINT: PPT NT 

210 FPI NT "PULSE EL NUMERO DFI PRODUCTO"* 

" DESEADO" 
226 OET A", if R5¿oi and n;;o2 HND 

THFN 220 
230 PPINT M ^rt«Plí<TKWrtW' 
240 ON A*.' GOTO 1 0A0 . J 500 . 2000 
Mi PRIN1 "l'IIW 

260 

2; 

PTAS" 

280 PPINT: PRINT RRINT 

?S5 PRINT TAE' 6 • • "DFSEA ALGO MAS 8/N?" 
290 OET R$ IF PFC"S" AND P*O m N" 

THFN 290 
300 IF Pí="S" TREN 130 
310 PPINT: PPINT PPINT 

315 PPINT "CON CUANTO DINERO ME PAGA"; 
320 INPUT DINERO 
340 IF rUNFFO 'rt THEN PRINT 

"NO EMPECEMOS CON BROMAS" ■ GOTO 310 
^0 IP DINERO C FACTURA THEN PPINT 

"NO ES SUFICIENTE" • GOTO 310 
360 VUELTA = rUNEPn-FACTURA 
370 PPIHT: PPJNT "TOME LE COBRAN" ; VI 'EL TA '• 

"PTAS. " 



60 FArTUPA=PM>;fCM+Ps;:*c c i+PT;;*f:T 

7ú PPINT "SU FACTURA ES DF M FACTURA . 



380 PRINT -PRINT : PRTNT TflB<I^> ; 

"HASTA OTPfi" 
390 ENÉ 

998 REM 

999 PFM 

1000 PEM VEMTfl PE MACARRONES 

1001 PEM 
1062 PEM 

1010 PPT NT "CUANTOS KILOS DESEA"; 
1020 IHPI.IT CANTIDAD 
1030 IF CANTIBAIKO THEN KUO 
1040 ÍF CANTIDAD>TM THfcN PRINT 

"SOLO TENGO"; TMJ "KILOS" ¡ GOTp 1010 
1 050 CM«CM+CANT I PhP : TM«TH-CflNT l DAH 
1060 SOTO 256 
1493 PEM 

1499 REM 

1500 PEM VENTA DF SPAGUETIS 
1381 PEM 

1502 PEM 

1510 PRINT "CUANTOS KILOS DESEA" ¡ 
1520 INPUT CANTIDAD 
1530 IF CÁNTIDA3K0 THEN 1519 
1540 (F eANTII»AD>TS ÍHFN PtfINT 

"SOLO TFNnO" ;TS.¡ "MI 03" OOTO, 1510 

1550 CS*CS+CANTIDAD : TS*f 3-CANTI DAD 
156© 0OTO 250 

1998 PEM 

1999 PEM 

2000 REM VMOfl DF IAUAPÍNES 

2001 REM 

2002 PEM 

2010 PRINT "CUANTOS KILOS DESEA"; 
2020 INPUT CANTIDAD 
2030 IF i:ANTIDAD<0 THEN 2010 
2040 IF CANTIDAD>TT THEN PRINT 

"SOLO TENGO" ;TT; "KILOS" -GOTO 2010 
2050 CT=CT+CAHTIPAP ; TT-TT-CAMTI DAP 
2060 GOTO 259 

Las líneas 50 y 60 establecen los precios y existencias de los macarrones, 
spaghettis y tallarines. Después. la línea 140 nos exige que pulsemos la léela 
C para entrar en la tienda, y las líneas 1 70. 180 y 190 nos muestran los produc- 
tos en venta. La línea 220 se encarga de que tengamos que pulsar el 1 , el 2 
ó el 3 para poder comprar (evidentemente, si pulsa una tecla de letra se deten- 
drá la ejecución del programa y obtendrá un mensaje de error, pero ya vere- 
mos cómo evitar esto en el capítulo siguiente). La línea 240 nos envía a la 1000, 
1500 ó 2000. según el producto que deseemos comprar. Observe que la estruc- 



tura dr los grupos de líneas 1000-1060, 1500-1560. y 2000-2060 es similar y evita 
que podamos comprar cantidades negativas o superiores a las existencias ( 1 030, 
Y después calcula las cantidades totales compradas y el nuevo valor de 
las existencias. Tras esto, las líneas 1060, 1560 y 2060 devuelven el control a 
la línea 250 y las líneas 260-300 se encargan de presentarnos la factura acumu- 
lada y de preguntarnos si todavía deseamos algo más. Si no es así, el control 
pasa a la linea 310, que nos pide que paguemos la factura, y después las líneas 
320-390 se encargan de realizar el cobro, sin permitir que le engañemos, de 
darnos la vuelta y de finalizar con una amable despedida. 

Pero ésta es una tienda muy poco surtida. Aproveche la estructura de las 
líneas 1000-1060. 1 500- 1 560 y 200* 2060 e introduzca nuevos productos. Acuér- 
dase de adec uar las líneas 50. 60. 220. 240, 260 y de introducir las nuevas líneas 
necesarias. 



El bucle FOR...TO...NEXT 

Al comenzar con la sentencia Ir . .THEN utilizábamos un ejemplo con el 
que imprimíamos 10 veces una frase en la pantalla. Revíselo un momento. Pa- 
ra ello utilizábamos una variable (contador) con la que llevábamos la cuenta 
del número de veres que habíamos impreso ];i frase Tras cada impresión, com- 
parábamos si ya lo habíamos hecho 10 veres. Si así era, terminaba el progra- 
ma, pero en caso contrario aumentábamos el contador en una unidad y volvíamos 
a imprimir la frase y aumentar el contador, y así hasta 10 veres. 

Kste tipo de acción, repetir un número de veces ciertas cosas, es tan fre- 
i líente que se ha diseñado una sentencia especial para utilizarla en estos casos: 
b lentcntia FOR. TO. NFXT. Compare los dos programas siguientes: 

10 REM COMPARACION 
20 C=l 

38 PP I NT "C0MM0P0PE " 
40 C-C+l 

50 IF NÜT<T>10. THEN ~-¡P 
£0 PRINT" SE ACABO •C s " ¡C 

10 REM COMPARACION 
2o pop r=i rr» 19 

30 PPINT'Tfir-IMOpnpE" 

40 NEXT C 

50 PRINT "SE ACABO. O" .C 

I-a similitud no es tan evidente, y por ello es aconsejable que vaya fijándose 
en la estructura del primer programa mientras que vamos hablando del segun- 
do. F.n la línea 20 nos encontramos con la sentencia FOR C - 1 TO 10 (desde 
que C vale I hasta que valga 10). que lo primero que hace es introducir en C 
ti valor 1 y ceder el rontrol a l;i línea siguiente. F.n la línea 30 imprimimos la 
palabra -CÜMMODORE» y en la línea siguiente NEXTC aumenta en 1 el 
valor de C y devuelve el control a la línea 29. Ahora C vale 2 y lo primero que 
hace la línea 20 es comparar si C es mayor que 10. Como esto no es cierto, 
pues C vale 2, el control pasa a la línea 30 y después la 40, que incrementa 
t- n 1 el valor de C, y así sucesivamenie. Cuando la línea 40 introduce en C el 



valor 10 y cede el control a la 20. todavía se vuelve a repetir el bucle, pues 
no es mayor que 10. Sin emhargo. tras esta repetición, el valor de C: pasa a 
ser 1 1 y entonces la comparamos a la línea 20. «Es C mayor que 10- es 
y el control pasa directamente a la línea 50 

Así, la sentencia NEXT C viene a ser como la sentencia C = C + 1 del 
mer programa, y después cede el control a la línea FOR...TQ La sentencia 
C-I y la comparación de C con el valor máximo permitido 10 En cuanto 
valor de C sobrepase el límite 10 ya no se volverá a realizar el bucle. 



Estructura general de la sentencia FOR 

El ferni® de la scn.cm.a FOR es: 

FOR «nombre de variable— -valor inicial- IX) -valor fin* 
STEP -.incremento.. 



(Instrucciones a repetir) 



NEXT -nombre de variable 



Nombre de variable: Es cualquier nombre de variable real, es decir, no 

podemos utilizar nombres de variables enteras ni alfa numéricas. 
Valor inicial: igual que incremento. 
Valor final: igual que incremento. 

Incremento: Cualquier expresión aritmética. Pero recuerde que éste to- 
mará el valor entero del resultado y que sólo se evalúa al principio del 
bucle* 



Kl nombre de variable, llamado variable índice, es cualquier nombre de va- 
riable real (recuerde que el C-(>4 sólo tiene en cuenta los dos primeros caracte- 
res) y hemos de poner el mismo nombre tras el NEXT. Así. de los programas: 

10 FOR l=i TO 19 
20 PRINT I 
30 NEXT I 

10 FOP 1 = 1 TO (j0 
20 PPT NT I 
30 NEXT K 

el primero se ejecutará sin error y nos imprimirá en pantalla los númert»s del 
1 al 10 Sin embargo, el segundo, tras imprimir un 1 (siempre se ejecuta una 
vez), sacará el mensaje, "? NEXT WITHOt'T FOR ERROR IN 30": pues 
se ha encontrado con un NEXT K sin que hayamos empezado ningún FOR 
cuya variable índice se llame K. Para obviar estos errores podemos prescindir 



Je poner el nombre de variable tras el NEXT y el Commodorc se encargará 
de poner atención. Así. los dos programas siguientes producen el mismo resultado: 



10 r-n* 1 = 1 TO 10 
; 0 PPIMT"HOI R" 

30 NEXT I 



10 FOR 1=] TO 10 
20 PRINT" HOLA" 
30 NEXT 



Sin embargo, es conveniente poner el nombre de la variable Iras el NEXT, pues 
esto mejora la legibilidad y entendimiento de nuestros programas. 

Al introducir la -estructura general" habrá observado una palabra, STEP, 
que no habíamos mencionado .unes. El \alor «incremento.. < olocadu tras el STEP 
indita de cuánto en cuánto irá aumentando la variable cuando pasemos por el 
NEXT. Considere los programas: 



ÍO FOP 1*1 TO 10 STEP 2 
20 PPINT I 
30 NEXT T 

10 FOP MI TO 4 STÉP 0.=; 
28 PPT NT K 
30 NEXT K 



( :<>mo en el primer programa indicamos un ..incremento-, de 2, la línea 20 iin 
primira en la pantalla la secuencia 1.3,5,7 y íí (el II no lo imprime, pues a ma- 
yor tjue el 10). mientras que en el segundo programa, al ser el valor de 
-incremento., igual a tí3. la línea 20 imprimirá la secuencia 1, 
Es importante recordar con qué valor sale la variable índice de 
•i los programas anteriores las líneas: 

40 PRINT "EL VALOR DE I ES"; I 
M PRINT "EL VALOR DE K ES"; K. 

observará que en el primer caso sale un 11 (pues es mayor que 10). mientras 
que en el segundo sale un 4.5 (pues es mayor que 4). 

El valor inicial no tiene que ser inferior al valor final, es decir, poda 
tribir buclrs decrecientes. 

10 FOP H=10 TO 1 STEP -1 
20 PRINT H 
30 NEXT H 



10 FOR fc*-50 TO -20 STrP 10 
20 PPINT P 
38 NEXT P 



En el primer programa obtendremos la secuencia tft 0, 8,..., 2 T I, mientras que 
en el segundo la secuencia será — 5ft — 4ft — 3fl — 20 Obscr\-e que el valor de 
I I al salir del bucle es H = 0 (introduzca el comando directo PRINT H). y que 
el valor final de R es — 10 (introduzca el comando PRINT R). Es decir, el bucle 
termina cuando el valor de la variable (en este caso H o K) sobrepasa el valor 
final, ya sea en sentido creciente o decreciente. 

Y además, como indica la definición del FOR, también podemos utilizar 
expresiones aritméticas en valor inicial, valor final. Así. el programa siguiente 
le pregunta qué valor inicial, N, y qué valor final. M, desea utilizar. El incre- 
mento se calcula como {M-Ny20 Observe, para distintos valores de M y N, có- 
mo funciona el incremento. 



10 REM PEFINIENÜO UN BUCLE 
20 T NPUT " VALOP I N I C |fll " . N 
30 INPUT "VflLÓR F I NAL " i M 
40 FOR T-N TO M STEr*ÍM-H>/¿0 
50 PPT NT f 
h& NEXT 1 




Recuerde que «valor inicial», «valor final» c «incremento- sólo se evalúan 
al principio del bucle. Después, la sentencia FOR realizará la ejecución con los 
lores calculados. 

de modificar el programa de «Tablas dr mullipli- 
>R? 

10 REM TABLAS DE MULTIPLICAR 

11 PEM 

12 REM 

20 REM A=ACIEPTOS 
30 PRINfT 

40 INPUT "QUE NUMERO PESFtf PFPASAP"-N 
50 fl=0 

60 FOR C=l TO 10 

70 pr i nt : pp i nt : pp i nt 
80 print n; m *";c.¡ ; 

90 INPUT R 

100 IF R=N*C THEN PPINT TRP»'9 ' ■ "BIEN" ; 
H=H+1 

110 if ron*c then ppint tabí* > .; "mal" ; 
120 print n; ,, *";c;"=";n*c 

130 NEXT C 

140 IF M? THEN PPINT "MUV MRL. HRV QUE 

VOLVER fl REPflSflRLfl" -GOTO 50 
150 PRINT "BIEN. PESEA REPASAR OTRA TABLA 

".'S''N) " 

160 GET R*i IF RfO"S" AND PtO"N" THEN 
160 

170 IF P*="S" THEN 30 



190 PPINT TOOS^'-HASTA nTPR" 
200 ENB 



Cuino se ha explicado, la salida normal de un bucle FOR- NEXT es a la 
línea siguiente a la sentencia NEXT, cuando se rebase el valor final de la varia- 
ble. No obstante, es posible salir de un bucle FOR- NEXT antes de que se com- 
plete, normalmente con una condición. 

El programa que proponemos a continuación pediría hasta 10 datos y loa 
sumaría, a no ser que le introduzcamos un número negativo; en este caso, se 
sale del bucle, deja de pedir dalos y presenta suma de los números introducidos 
ames del negativo. 

10 FOP N=l TO 10 

20 INPUT " NUMERO?";» 
30 IF D<0 THEN lfi0 
40 S=S+P 
TO NEXT N 

100 PPINT"LA SUMA DE LO* NUMERO? ES";-' 

Ejecútelo y experimente con él todas las posibilidades; no obstante introducir 
una condición dentro de un bucle FOR- NEXT, indica que dicho bucle no es 
la forma óptima de resol ver el problema; ademas, la condición de finalización 
del bucle puede no ser obvia para quien no ha construido el programa. 

En el ejemplo anterior, si nunca melemos un número negativo el bucle aca- 
Iwría por su vía normal, sólo al introducir un número negativo saldría del bucle 
antes de concluir éste; evidentemente, si se hace un programa de este tipo es 
porque no estamos seguros de la cantidad de datos que necesitamos en cada eje- 
cución y sería más lógico diseñar el siguiente programa: 

19 INPUT "CUANTOS NUMEROS DESEA INTRODUCIR" •* A 

20 FOP N«l TO A 

30 INPUT "NUMERO?" ;D 
40 $=S+n 
50 NEXT N 

€0 PPINT-LP SUMA DE LOS NUMEROS ES";? 

Ahora podemos lijar en cada ejecución el número de datos a sumar, y el 
bucle finaliza siempre por su vía normal. 

Lo que nunca debemos hacer es entrar en un bucle sallándonos la sentencia 
FOR, porque obtendríamos un mensaje de error. 

Al diseñar el programa siguiente se pretende que la suma que se real i/a en 
la línea 40(A=A + I) empiece desde el valor inicial 1 = 1 si el valor que introduci- 
mos para A es positivo, y que empiece con valor de 1 = 10 si el valor que damos 
a A es negativo; en este segundo caso nos meteríamos en el bucle por otro punto 
que la sentencia FOR. tecléelo: 



19 INPUT "VALOR pflpfl fT? M ;p 

20 IF ñm THEN Isí@- On ro 40 
30 fOr T=l TO 90 

40 R=ñ+T 
50 NEXT I 
60 PPINT R 



AI ejecutarlo comprobará cómo la ejecución transcurre con normalidad, siem- 
pre que demos a A un valor positivo, pero si introduce un número negativo, 
obtendrá el siguiente mensaje de error: 

NEXT WITHOUT FOR KRROR IN 50 



Bucles anidados 

Es también muy corriente que se necesite repetir un proceso que a su 
convite en repetir Otro* procesos. Esto puede conseguirse fácilmente en BA- 
SIC, basta con incluir un bucle FOR-NEXT dentro de otro bucle FOR-NEXT, 

Resulla un trozó de piograma COfl el aspecto: 

t — FOR variable -1-valor inicial -1 ÍO valor final -I STEP incremento 1 
r-HOR variable -2 -valor Inicial -2 IO valor final -2 STEP incremento 2 



HMEXT variable -2 
1 — NEXT variable I 

A la inclusión de un bucle dentro de otro suele dársele el nombre de «anida- 
rnicnio» tle bucles. La utilidad de poder anidar bucles rOR-NEX I quedará pa- 
tente con un ejemplo. El siguiente programa cuenta 47 huevos: 

10 REM RECUENTO DE HUEVOS 
20 FOR 1=0 TO 3 
30 FOR J=0 TO 11 

40 PPTHT I ; "DOCENAS V" ; t ; "HUEVOS" 
50 NEXT J 
60 NEXT I 

(Jomo habrá podido observar, para cada valor de la variable índice de bucle 
«externo» 1 (fl I, 2. ó li). la variable índice del bucle -interno», J. recorre todos 
sus valores, esto es. de M al 11. Cuando | llega a 12 hemos contado otra docena 
y, por tanto. I debe aumentar en una unidad y ] debe de pasar a 0 

Un punto importante a tener en cuenta, cuando se anidan bucles, es que 
el bucle más interno debe estar completamente contenido dentro del más exter- 
no. Teclee y ejecute el siguiente programa: 



10 FOP 1=1 TO 4 
20 FOR 1*2 TO 5 

39 PPTNT IjJ 

40 NEXT J 
50 NEXT I 



Si <*n lugar de anidarlos, se solapan, obtendremos un error; compruébelo intro- 
duciendo y ejecutando el siguiente programa. 

10 FOP 1-1 TO 10 
20 FOR 1*2 TO 7 
?0 PRTNT I . T 
40 NEXT I 
S0 NEXT J 

Obtendrá: 

1 2 

2 2 

3 2 

4 2 

5 2 

6 2 

7 2 

8 2 

9 2 
10 2 

? NEXT WITHOUT FOR ERROR IN !>0 
READY 

Una manera de garantizar que el bucle más interno se concluye antes que 
el más externo es omitir el nombre de la variable en la sentencia NEXT; el C-64 
recordará por usted cuál rs el bucle que corresponde cerrar en cada punto y 
ejecutar! correctamente cualquier anirlamirnto de bucles. No obstante, recuer- 
de que el funcionamiento de un programa será más claro si emplea la sintaxis 
completa de NEXT 

Otro punto a tener en cuenta, por evidente que parezca, es que la variable 
Indice de un bucle debe tener un nombre distinto del de las variables índice de 
i.nla uno de los burles más externos que él. A veces se olvida este aspecto y, 
como en el programa que ahora se le propone, utiliza nombres de variables ín- 
dice que comienzan por los mismos dos caracteres: 

10 FOP INDI*] TO 3 
20 FOP IND2*= 1 TO 3 
: =0 PRINT INDI - IND2 
4fi NEXT INP2 
^•0 NEXT INDI 

Muchas veces el rango del bucle interno es controlado por el valor de la va- 
riable índice del bucle externo. Así, el programa que aparece a continuación, 
que presenta los cuatro primero múltiplos de cada uno de los nueve primeros 
números enteros, utiliza la variable N para determinar completamente el valor 
inicial, el final v el incremento en el bucle interno. 

10 FOR N=l TO 9 

?0 FOR M=N TO 4*N STEP N 

30 PPTNT M . 

4« NEXT M 

30 NEXT N 



Al ejecutar el programa obtendríamos: 



1 


2 


3 


4 


2 


4 


6 


8 


3 


6 


9 


12 


4 


8 


12 


16 


ó 


10 


15 


20 


6 


12 


18 


24 


7 


14 


21 


28 


8 


16 


24 


32 


9 


18 


27 


36 



Terminaremos el capítulo con nuevos ejemplos que muestran la generalidad del 
uso de bucles FOR-NEXT: 

El ordenador va presentando ocho sumas (siempre las mismas) y pregunta 
el resultado; si le damos el correcto, lo indica, y si no lo es, dice que es incorrec- 
to y presenta la respuesta correcta; en cualquier . aso aparece otra suma hasta 
acabar con las ocho. 

19 PFM SUMAS FIJAS 

20 FOR 1 = 1 TO 7. 

3ÍÜ pop K=4 TO 1 STEP-1 

40 PPINT i; "+";k; "■" : IMPUT "CHANTO 

VALE ESTA SUMA" • B 
5® TF B=I+K THFN PPIHT"COPRECTCr 
60 TF BOI+K THEM PPINT" INCORRECTO . LA 

RESPUESTA CORRECTA ES ":j*K 
70 NEXT K 
30 NEXT I 



Compruebe que podríamoi sustituir las líneas 70 y 80 por una única línea 70 
(pie fuese NF.X1 K.I 

W REM SIMULA UN REI 0J DIGITAL 
?€i FOR J-0 TO 59 
30 POP 1=0 TO 9 

40 PPINT M r3«WPJBTfIWWWIiM»»»WPÍM»Mr : T; 

" : " ; I 

30 FOR 2«1 TO 10R-NEXT7 
70 NEXT I :NEXT J 

Al ejecutar el programa observa -un reloj» en el centro de la pantalla 

Los caracteres de la línea 40 son ya conocidos, el primero, -j^ sirve P 31 * 

borrar la pantalla, y los otros , |Q||Jj . para situar la impresión en el centro de 

la pantalla aproximadamente. Observe también cómo en la línea 50 utilizamos 
un bucle FOR-NEXT para que exista un pequeño intervalo de tiempo entrí 



3 Programación avanzada 



En este capítulo vamos a examinar ciertas ayudas y técnicas que nos sumi- 
nistra el C-64 para mejorar y hacer útiles nuestros programas. A medida que 
avancemos los programas van siendo, necesariamente, más largos y complica- 
dos. Es importante que los teclee y compruebe por sí mismo su luncionamiento 
i no se conforme con una ojeada), además es posible que alguno de ellos le lle- 
gue a ser útil en algún momento y le interese grabarlo. 



FUNCIONES Y VARIABLES INCORPORADAS 

En nuestra actividad cotidiana estamos acostumbrados a utilizar cierto nú- 
mero de Junciones tales como -la raíz cuadrada de un número», «el seno de un 
ángulo*, ele Es evidente que no es difícil desarrollar un métOOO para Utilizar- 
las en nuestros programas, pero su uso es tan frecuente que el C-ül se ha pre- 
ocupado de ofrecernos gran número de ellas incorporadas en el sistema. 

V ¿qué es una función? Observemos el ejemplo siguiente: 

V - f(x) Y - x*x 

"Y depende de x" "Y es igual al cuadrado de x" 

En la primera parte aparece la expresión general de función: «Y es función 
de x». que es lo mismo que decir: «Y depende de x». Esto es, el valor que loma 
x influirá en el valor que tome Y. x recibe el nombre de argumento e Y es el 
multado de aplicar sobre x la función f. Quizá todo esto es un poco confuso. 
Vamos a explicarlo mediante la segunda pane del ejemplo. Aquí tenemos unos 
casos particulares: 



mm 


* 


Rnullúdo 

y 






4 






9 






16 






É 

* 



En el Commodore vienen incorporadas gran número de funciones. Sin em- 
bargo, exisie una limitación en la capacidad de manejo de funciones por los 



ordenadores: tas funciones han de dar un resultado único- Es decir, para un valor 
del argumento x sólo pueden dar un valor del resultado Y. Esto, tomo vere- 
mos, afecta a (unciones como SQR (x). (raíz cuadrada de X). pues la raíz cua- 
drada de un número tiene dos resultados: por ejemplo, la raíz cuadrada de 4 
puede ser o bien — 2 o bien + 2. sin embargo la función SQR sólo presenta 
uno, el positivo. 

Además de las fundones numéricas (aquellas en que el argumento y el resulta- 
do son daros numéricos), el C-64 incorpora diversas funciones para trabajar 
con dalos de tipo alfanuniérico y. naturalmente, reciben el nombre dt junciones 
alfanuméricas. 

Vamos a realizar una revisión de todas estas posibilidades que nos darán 
mucha potencia y agilidad en la construcción de nuestros programas. 

Funciones alfanuméricas 

En el capítulo 2 vimos los datos y las variables alfanuméricas. pero hasta 
ahora lo único que sabemos hacer con ellas es imroduc irlas, imprimirlas y poco 
más aparte de la concatenación de cadenas. Vamos a ver que más nos ofrece 
el C'ommodoie para enfrentarnos con esie tipo de datos. Esta sección es muy 
iinporianie, pues muchos de los datos con los que tendremos que trabajar (fi- 
cheros) serán de tipo alfanuniérico. 

La punción LEN 

l.a estructura de la función l.EN es: 



I. EN (AS) 



AS: representa un argumento alfanumérico, puede ser una constante, 
una variable o una expresión alfanumórica. 



Esta función nos permile conocer el número de caracteres del argumento. 
Así. con el programa: 

Í0 ftf» w HOLfi , '*B*»' , ?OUE TñL ESTAS?" 
m PRINT LEM<R*> , LEN<Bt>/ LEN<ft*fftf9 

Aparecerán en pantalla los números 4. IT» v 19. F.l primer v tercer caso son 
evidentes. En el segundo hemos de tener en cuenta que también los caracteres 
en hlanco forman parle de la longitud de la cadena. La frase -¿Qué tal estás?, 
contiene dos símbolos de interrogación, dos espacios en blanco y 1 1 letras En 
total 15 caracteres. 

Esto nos sirve para poder manejar cualquier cadena que nos encontremos, 
sin tener que conocer previamente su longitud. Peni, antes de construir ejem- 
plos más útiles, vamos a estudiar las funciones de fragmentación de cadenas. 



FRAGMENTACIÓN DE CADENAS 

Recibe esle nombre la operación de extraer un conjunto de caracteres de 
una cadena, v para realizarla disponernos de tres funciones, que son: Lh.f 1 > 
¡j3 ' izquierda). MIOS (middíe = medio) y RIGHTS (right - derecha). 

La estructura de la función LEFTf es: 



I.EFTS <A$. n) 



AS: Representa un argumento alfanumérico. 
n: Indica el número de caracteres que se van a extraer. 



l.a lectura completa de I.EFTS <A$. n) podría ser "extrae los n primeros 
tara, teres comenzando por la izquierda-. Por ello, la ejecución de la linea; 

10 PRINT LEFTO ('-MARIA". 3) 

Imprimirá los caracteres MAR en la pantalla. El programa: 

\V\ PPINT "T 1 
H TNPUT "TFI I PR UNH PHLrWrV* ¡ N* 

:a rfip 1*1 Tfi I EN<N*) 
4R PPIM1 l£FT$<N»/I> 
5B NEXT l 

xa imprimiendo, sucesivamente el primer carácter de NS. los dos primeros, los 
tres primeros, etc. Termina por escribir completamente NS. 
El comportamiento de la función: 



R1UHT8 (A$. n) 



AS: Representa un argumento alfanumérico. 
n: Número de caracteres que se van a extraer. 



Podríamos decir que es el inverso, pues, comenzando por la derecha, extrae 
IQS n primeros caracteres. Compruébelo, introduciendo el programa: 

\ft PPINT "7}" 

¿* INP'.IT "TECLEA UNA Pfll.RBPH" J N* 
3fei FOP 1 = 1 TO LEN(H* S ' 
4* PPT NT PlfiHT-t'N*. n 
=-Pi NEXT I 



La íunción MID$ es la más complicada. Tiene tres argumentos. 



MID$ (A$, p. n) 



A$: Representa un argumento alfanumérico. 
p: Representa la posición del primer carácter que se va a extraer, 
n: Es el número de caracteres, hacia la derecha, que se van a extraer. 

Pura el ordenador, los caracteres que forman una cadena están numerados de 
izquierda a derecha, empezando por el 1. IX- este modo, en: 

«ME LLAMO COMMOIX.)KK- 

la letra A ocupa la potk iói. 6, la letra C la 10 y la letra D la 15. Si introduce 
el siguiente «ornando directo: 

PRINT MIDS ("ME LLAMO OOMMODORF", lft :i) 

en la pantalla aparecerá COM, pues la C ocupa la décima posición, y hemos 
indicado que se extraigan tres caracteres. Recuerde que también los espacios 
en blanco son caracteres. 
El programa: 

10 PRINT "T 

20 INPUT "TECLEA UNA PALABRA" ; N* 
30 FOR I-LENCNf) TO 1 STEP-1 
40 PPÍNT MID*ÍN*,I.1>; 

50 NEXt I 
6« 00 T0 69 

SC encarga de escribir al revés cualquier palabra que usted ic lee. Olwcrve cómo 
se ha u(ili/ado un burle FOR decreciente para que el valor de I comience por 
la última posición de carácter de NS y vaya hasta la primera. Otro punto a ob- 
servar es la utilización en la línea fió deí bucle infinito. 

60C.O1T) 60 

Para evitar la aparición del mensaje KLADY con el que el Commodore nos ob- 
sequia, cada vez que termina la ejecución. Para salir de este bucle pulse la tecla 
RUN/STOP. 

Antes de abandonar estas funciones trate de deducir lo que imprimiría este 
programa: 

10 A$=" CUCHARA" 

2* PPT NT LFFTf (A*> 3>+RIGHTf <B$/3>+ 
MIDÍ' A*.3»3> 

;Y éste:': 



IR flí=" MUCHACHOS" 

20 F*=RIGHT*<fl*, r>+MTP$-:A$.8. 134 

LEFTí(AÍ ■ 1 >+HÍB*< R$ .3,2? 
3* C$=:LEFT$<Af .2>+RIGHT$-:Aí .4> 
40 PRINT BÍ+" "+CÍ+" "+A$ 

En las sentencias PRINT, de ambos ejemplos, podríamos haber sustituido 
fl símbolo " + " (concatenación de cadena) [>or el símbolo 



Si omitimos el tercer parámetro del MID$, n, obtendremos todos los ca- 
racteres que haya en la cadena, desde el indicado por p hasta el final. 
Si en MIDS omitimos los argumentos n y p obtendremos un mensaje de 
error Si en LEFTS y en RIGHTS. omitimos n, el número de caracteres 
obtendremos un mensaje de error. 

Si en LEFTS, RIGHTS y MIDS, ponemos un valor de n, superior al nú 
mero de caracteres que se pueden tomar, obtendremos todos estos ca- 
racteres. 



Las funciones VAL y STRS 

S>n. en cieno sentido, simétricas. VAL convierte una cadena, que contenga 
dígitos, en un número, mientras que STRS conviene un número en una cade- 
na Veamos algunos ejemplos: 

1* PFM LA FUNCION VAL 
20 A$="12" :B*= M 34" 
PPINT A$+B* 

48 A=VALvA$> B*VflLÍB$) 
50 PPINT H+f: 

I tic es un buen momento para repasar la diferencia entre la cadena «12» y el 
número 12. Cuando tenemos una serie de dígitos, por ejemplo 12, dentro de 
una cadena, el ordenador no lo interpreta como el número 12. sino como los 
caracteres 1 y 2. Por ello, cuando el control llega B la línea 3fl en la pantalla 
aparece la cadena 1234, la unión de ambas cadenas, y no el resultado dv. sumar 
los números 12 v 34. Quizá esto hubiera sido más claro si hubiéramos concate- 
nado las cadenas AS -«HOLA» y B$ «PEPE». Cuando el control llega a la 
linea 40, la función VAL saca los dígitos contenidos en las cadenas AS y B$ > 
los introduce, como números, en las variables A y B. Finalmente, la línea 50 
imprime el número 46" como resultado de sumar esta ve/, si i los números 12 y 
34. El fórmalo general de la función es: 



VAL (AS) 



AS: Argumento arfanumérico. 

Si A$ contiene sólo dígitos, por ejemplo, AS ="346", B=VAL (ASI es 
el número 346. 

Si AS contiene espacios en blanco delante de los dígitos, VAL los ig 
ñora y extrae los dígitos. 

Si delante de los dígitos hay un signo, se extrae también el signo. 
Si AS contiene letras y dígitos, pueden darse dos casos: 

a) Empieza por dígitos: entonces VAL saca todos los dígitos que 
haya hasta la primera letra. 

bl Empieza por letra: en este caso VAL nos devuelve un cero. 



,:Y cómo actúa S I RS:'. pues justo al revés. 

m REM Lft FUNCION STRf 

20 R«12¡B«34 

30 PRINT A+B 

46 Etf-STRfttfti' * MMTMKB) 

50 PRINT H:P+H$ 

l\n la línea ¡ntfOdtH irnos los números 12 y 34 cu la?» variables A y B. respcCÜ* 
vamenie. Después en la 4W utilizamos STRS sobre A y B pura convertir los nú- 
meros (Míe representan en las cadenas 1. 2 y 3, 4. <|iie introducimos en las variables 
AS v H». De eftte modo, la línea !>W imprimirá en la (Muralla la secueiít ia 1234. 
La estructura de la rumión STRS es: 



STRS (A) 



A: Argumento numérico. 

Tenga cuidado, pues STRS reserva un espacio para el signo de A. Asi, 
si hacemos A = 3 y AS = STRS (Ai, el comando PRINT LEN 1AS) saca- 
ra un 2 en la pantalla, pues la primera posición de AS se reserva para 
el posible signo de A. 



Las funciones CHRt v ASC 



El ordenador almacena la información, en su memoria, mediante unos có- 
digos numéricos. Estos códigos, en sistema decimal, van del 0 al 255. esto es. 
256 códigos distintos. Por ejemplo, a la letra A le corresponde el código 65; a 
la B, el b<>. y así. hasta ta X. a la que le corresponde el U Ü Al dígito tí le corres- 
ponde el código 4U, al 1 el 49 y así hasta el u . al que le corresponde el código 
57 (vea el apéndice D). Compruébelo ejecutando el programa; 

10 REM CODIGOS BE LAS LETRAS 
20 FOR I»€5 TO 9(3 

3@ PP [NT <HP*a>. 

3? FOR K=l TO 500*NÉKf K 

40 NEX1 T 



Que iiiiprimirá en la pantalla las letras de la A a la Z. En la línea 'M vemos 
U utilización de la función CHRS. CHR$ lienc un argumento numérico. I. 
\ da como resultado un carácter; el correspondiente al código indicado. L Así. 
utilizando CHRS podemos saber a que carácrer í orresponde cieno código. Es 
fácil resumir su esiructura general. 



GHR1 {A) 



A es un argumento numérico cuyo valor puede variar de 0 a 255. Un 
valor fuera de este rango provocara un mensaje de error. 



Mediante CIIK$ podemos manejar caracteres que no pueden apaniei en 
«..«lenas Por ejemplo, si queremos imprimir un (exto con comillas podemos 
uiili/ar 

10 INPUT'TECLEfl UNA PftLHPPfl" fp* 

PRINT "T 
3Q PPINT r:HPf<34>,Pr.fHPf'34> 

ASC es la luiuión inversa. Esto es. d argumento es un carácter y responde 
■ on rl código i orre>|x nidiente a dicho carácter. Considere el ejemplo siguiente: 

10 REM 

¿o PEM * DETECTOR DE TRAMPAS ♦ 
39 REM 

4A PRIHT "T 

5«? PRINT: PPINT: PRINT 

6* PPINT TRBÍ7) ; "PULSE UN NUMERO"* 

M DÉL "í AL 6" 
7<? 0ETR*:IF R*.-« QP Rf-CHPStl3> 

m IF flSC-'fl*K49 0R R8C<A*»54 THEN 

PPINT : PRINT : PRINT TAB06) i "TRAMPOSO" 
90 PRINT PRINT: PRINT 

IPtPi PPINT TAB<9*; M HA PULSADO LA TECLA " 
;Aí 

En la linea 70 revisamos el teclado para ver si se ha pulsado alguna tecla. 
Observe que si hubiéramos empleado GET A o GET A$ y el usuario pulsase 
una tecla de letra, obtendría un mensaje de error. Utilizamos GET AS, pues 
así podemos teclear letras o números y después, usando .ASC, averiguaremos 
cuáles el carácter que ha introducido. Rn la segunda parte de la línea 70 la com- 
paración AS = " ** obliga a esperar a que se pulse alguna tecla, y la comparación 
AS = CHRS (13) se encarga de no aceptar que la tecla pulsada sea la tecla Rh- 
TURN. (El código de la teela RETL'RN es el 13.) 

Después, en la línea 80 comprobarnos si el código de la recia pulsada esta 



comprendido cnirc el 49 y el 54, que son los correspondientes a los dígitos 1 
y 6, respectivamente. Si no es así. el Commodorc le acusará de marrullero. 

El esquema de este programa es ampliamente utilizado para evitar que na- 
die pueda hacerse el listülo y estropear la ejecución del programa por haber pul- 
sado una tecla distinta de las que el ordenador esperaba recibir. 

La estructura general de la función ASC es: 



ASC (A$) 



A$: Argumento alfanumérico. Si el argumento contiene más de un 
carácter, ASC devolverá el código correspondiente al primer carácter 
de la cadena. Por ejemplo: 

PRINT ASC ("COMM0D0RE") 

Imprimirá en la pantalla el número 67, que es el código correspondiente 
a la "C". 



El reloj del tiempo res) 



Una caraiierísiica del C-64 es que mantiene en funcionamiento un reloj. 
Un reloj en hora*, minutos y KgtlAoM que podemos utilizar pan saber cuánto 
tiempo nace que estamos iralhijantto o cuánto tiempo tarda el ordenador en rea- 
lizar ciertas cosas. 

A este reloj podemos acceder mediante dos variables TIS (TIMES) y TI (TI 
Mh), Cuando enchufarnos 1 el ordenador estas dos variables comienzan en 0 y 
van incrementándose como lo hace un reloj. Pero podemos manejar el contení- 



es 



encender el Commodorc 



TIS- "hhmjiw" 



Donde: hh representa las horas, de 0 a 23. 

mm representa los minutos, de ti a 59. 
ss representa los segundos, de 0 a 59. 



Cuando encendemos el ordenador TIS comienza con el contenido "TOftW 
y va variando de segundo en segundo. Si queremos darle a TIS cierto valor, 
por ejemplo, las 9 de la mañana. 15 minutos v 40 segundos, hemos de introdu- 
cir el comando: 

TIS= "091540" 

Trate de utilizar TIS para construir un reloj en el centro de la pantalla v 
compare después su solución con el programa siguiente: 



10 PEM ***************** 

28 REM * RELOJ DIGITAL * 
^0 REM * ******* ********* 
32 PRINT " T 

PEM ***##.**♦♦*♦♦*♦♦**** 
1k PEM * INTROBUCE HORAS * 
-::-: PEM i******************* 

40 INPMT"TECLFE LR HORfi CON 7 CIFRAS" >H* 
S0 IF LENCHÍ) :>2 THEN 4y 
K0 IF LEFTfHt. 1 >- M ?"ftNH 

RSC<RlC5HT*<H*il>»Sl THEN 40 
7& IF RSCíLEFTf<H*. 1 "-K48 OP 

ASC • I EFT*< HI ■ 1 > »50 THEN 40 
*0 IF RSC-:PIGHTt<H*.r'.''48 OR 

flSC<RIGHT$íH* l > ->57 THEN 4fi 
82 Peí NT "3" 

84 PEM ********************* 

3* REM * INTRODUCE MINUTOS * 

8f¡ REM ********************* 

90 INPUT"TECI.FF MINUTOS CON 2 C TFPfl" " . Mí 

\W IF LEN(M*><>2 THEN 90 

110 IF ASC< LEFT*<'M* , 1 >><48 OP 

RSC CLEFT$<MÍ 1 1 ) ->53 THEN 90 
I2Q IF ASC<RIGHT*<W*>1>)<4S OR 

HSí <RIGHT*<M« ,1>»37 THEN 90 
122 PPINT M n" 

1?4 PEM i********************* 

126 pem * intpopiice segundo 0 - * 
128 pem ********************** 
130 input-teclee segundos con 2 cifras"; 

S* 

14H IF LEN<S*>02 THFN 130 
1S0 IF R c ;r.LFFT$.S*,OX43 OP 

RSC<LEFT*<9f/l>>>53 THEN 139 
\fM if RSC<RI0HT$''3*.OX48 OP 

RSC PIHHTt'SÍ • l>»5r" THEN 130 
162 PEM ********#************** 
1¿4 PEM * CPECION E IMPRESION * 
16* PEM * DEL RELOJ * 

res pem ♦♦**♦********♦♦*♦*****♦■ 

170 TI*=H*+MÍ+5* 

180 R*VfiL<TI*> 

130 PRINT '•nííWWWWPlWPW" 

ppiHT TflBa5>;LEFT*cri#/2>; ,,: ^'¿ 

MTDÍCTIÍ. -i,2>: M - " ¿ PIGHTf T I* . 2> 

219 TF R-VHL<TIÍ?=0 THEN ?M 

220 GO TO 180 



Complicado, ¿no? En realidad es bastante sencillo, la complicación surge de 
querer hacer un programa que impida que el usuario introduzca datos inco- 
rrectos. Las líneas 50-80 se dedican a comprobar que usled teclea una hora com- 
prendida entre 00 y 23; y si no. no le dejará pasar de aquí. Si el primer dígito 
de la hora es el 06 el 1, el segundo dígito puede variar de » a 9; pero si el primer 
dígito es un 2, entonces el segundo sólo punir tomar los valores 0 1, 2, ó 3, 
y por esta surge la línea 60 I -as líneas 100-120 y 140lo0 se dedican a comprobar 
que tanto los minutos como los segundos estén comprendidos entre 00 y 59. Ks- 
tas líneas de comprobación evitan que se pueda introducir cualquier otro rango 
de números o que se introduzcan letras, en lugar de números, para ¡a ver qué 
pasa! EuttJ e\ liemos dedicado más de la mitad del programa a verificar que 
el usuario init ializa el reloj en forma adecuada. 

í\l reloj se construye y se pone en funcionamiento con las líneas 170220 En 
la línea 170 K inií ¡aliza él reloj interno de la máquina ron la hora que hemos 
introducido, y en la línea 200 se imprimen las horas, minutos v segundos, sepa- 
rados por símbolos de dea pumos para mejorar la legibilidad, ¿y panqué lirven 
las líneas 180 210 y 220? En la linea 180 introducimos el valor inicial de TI$ 
en R, y con la linea 210 obligamos a que no se vuelva a imprimir el reloj hasta 
que haya pasado un segundo, es decir, haata que el valor actual de Ti$ sea dis- 
timo del valor anterior tleTI$(que está metido en K(. Después, en la línea 220 
se introduce en R el nuevo valia de TIS para poder seguir comparando. 

Desde luego, hemos hecho un uso extensivo Je las funciones de cadena. Ira- 
le de reducir esta complicación utilizando \aiiables numéricas H, \l v S en lu- 
gar de US, MS, y í>$. 

Además de esta variable alfanuiuénca 11$ disponemos de otra variable real. 
TI. nina poder utilizar el reloj del ordenador 'l'í puede tomar valores entre 0 
y M 84000 y aumenta en una unidad cada 1/60 segundos. decir, cada ve/ que 
TI ha aumentado en 00 ha pasado un segundo. Así. 24 horas, que es lo máximo 
que podemos representar, tanto con TI como con 11$. es igual a: 



>0«tiO.t*>- ÜIH4000 

Lunfa latí de tiempo del TI 
' — -segundos 
- minutos 



Cuando encendemos el ordenador, tanto TIS como TI comienzan desde 0 
Cuando asignamos un valor TIS, también se lo asignamos a TI. así si ejecutamos: 

I" TI*=" 143226" 
20 PPINT TIÍ.TI 

I 

En la línea 10 ponemos TI$ en 14 horas. 32 minutos y 2n segundos, v por ello 
el valor de TI es 14*h0Wf,«*.:vr60'6flV>6'60 = 3140760 

Una aplicación interesante de estas dos variables es la de utilizarlas para pro- 
vocar pausas controladas en los programas. Así. las líneas siguientes podemos 
utilizarlas en muchos de nuestros programas para provocar una pausa de 2 se- 

li? RFH PROVOCANDO UNA PAUSA 
1? PRINT "73" 

20 PPINT TRB<10> : "PAUSA PE DOS SEGUNDOS" 



30 TIÍ=" 000000" 

40 IF VflL'TI$><2 THEN 4* 

«=;0 PPINT TI" 

PPINT TflB- !5),"SE RfABO" 



\fl PFM PROVOCANDO IJHA PAUSA 
15 PPINT "rr 

;-0 PPINT TAB-'in . . "PAUSA DE DOS SEOUNDUS" 

30 TT*="00O00O" 

41? IF TK12P THEN 40 

=¡0 PPINT "73" 

60 PPINT TAP< 15'.: "SE ACABO" 



Si se desea pausas más prolongadas, aumente el valor de comparación de 
la Une.. 40 Observe, en el segundo programa, que para darle un valor inicial 
a I I lo hemos de ha. er a naves i Ir 11$ (linea 3«). Si intenta iuiciali/ar directa- 
mente TI, obtendrá un mensaje de error. 

Otr.i aplicación importante de estas dos variables es la de medir el tiempo 
que larda en ejecutarse un programa. Miramos el valor de TI antes de empezar 
a ejecutar el programa, v cuando ésie termina volvemos a mirar el valor de TI; 
la diferencia entre estos valores mis indica la duración del programa. Vamos a 
practicarlo midiendo la duración de las pausas controladas por el bucle FOK. 

10 PFM ♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦>M!** 

20 PEM * DURACION DE UNA PAUSA 
í« PEM ♦ FOR * 

40 PFM 
50 PPINT "73" 

60 INPUT"TEi.:LEF. EL VAI.0P FINAL PFL FOP". F 
70 Pf TNT "D" 

80 PPT NT • PPINT PRINT fAB< 17 ' • "PAUSA" 
*Q P=TI 

100 FOR 1 = 1 T0 F NEXT I 
110 X=TI-p 
120 PPINT "73" 

l-:0 PPINT "ESTA PAUSA HA DURADO" ¡ X/6Q¡ 

"SFi«i INDOS" 
14fi PPINT : PPINT : PPINT 
150 PPINT"PP0BAM0S OTRA VEZ <S/N>~'" 
160 GET A*:IP Aí="" OR AÍ=CHR$a3> 

THEN 160 
170 IF A*="S" THEN 50 
180 IF AíO"N" THEN 150 
190 PRINT: PRINT PPINT TAB'l^; 

"HASTA OTRA" 
200 GO TO 200 



Observe, en la línea 10Q que eslc bucle no hace más que entretener el control 
de ejecución, mientras que 1 pasa de 1 a F. Así. cuanto mayor sea el valor de 
F más larga será la pausa que introduzcamos. construcción de este tipo de 
pausas es mucho más sencilla que si utilizamos TI o TIS, y lo único que tene- 
mos que hacer, antes de utilizarla, es tener una idea aproximada de cómo varia 
su duración, según los valores que le asignemos a F. En la figura 3 
algunos de los resultados. 



Valor U h' 




355 


u 


7.5 




\m 


1.W3Ü3JJ 


I4WÍ 


ZM 


NN 


276*66667 


\m 


4.IB1113H 


%m 


.5 IM8MH 



3.1 Apm*im«cnjn Hr U iIurkíAii <!«■ rienaa BBVftBl FOR 

Sin ciukirgo. estos valores ose ilan. y por ello es mejor que ensaye usted mismo 
los valores que más le interesen y construya su propia tabla de duraciones. 

Kn la línea 9H introducimos en R el valor de TI antes de la pausa FOR. 
Para obtener la duración de la pausa basta con restar al valor de TI. después 
de la piusa, el que tenia antes (que tenemos guardado en R). \ cío sr iealiza 
OI la línea lltí 1.a diferencia se introduce en X, y como TI aumenta 60 unida* 
del por segundo, para cali ular el número de segundos que ha durado la pausa 
hay (pie dividir \ enire <ifl 

Las líneas l*»0 — l'K* le dan la oportunidad de leali/ai muí envayo > -« inii- 
pan de impedir que su respuesta pueda ser otra que la de pulsar la léela S (para 
sí) o la léela \ (para no). Al liiial <M progratn.i volvemos a utilizar la estructura 
de bucle infinitó: 

•m GO TO ZM 

que evita que .t¡>are/,ia en panialla el mensaje RF.ADY tras la finalización del 
programa. Para salir de este bucle pulse la leda RUN/STOP. 



Las funciones numéricas 

No se asusle. en realidad no son tan terribles y nosotros nos limitaremos 
a explicarle cómo utilizarlas en su ordenador. La mejor o peor comprensión 
de ellas dependerá, fundamentalmente, del grado en que usted necesite emplear 
estas funciones en sus programas. Si usted eslá familiarizado con estas funcio- 
nes, seguramente le bastará con revisar la descripción general que se realiza en 
el apéndice B. y sí es un «matematífugo*. tenga la seguridad de que podrá cons- 
truir muy buenos programas sin necesidad de aprender matemáticas. Para el 
estudio de estas funciones las agruparemos en dos bloques: las funciones arit- 
méticas y las funciones trigonométricas. 




En este apartado revisaremos las funciones INT. ABS, SON. SQR. LOG. 
EXP, y el número ». 



La función INT (integer « entero) sirve para extraer la parte entera de un 
numera Estoes, si hacemos Y- INT (X). para X= a6, Y valdrá para X-3.83. 
Y valdrá 3, etc. 

Compruébelo ejecutando el programa: 

10 REM 

:v PFM ♦ Ift FUNCION INT ♦ 
30 PEM **#!#*♦*♦♦#*♦■**##♦♦ 
4* PPT NT "73" 

™ IMPIIT-TECI FE UN NUMERO* ;X 
60 PPINT "1" ¡PRINT PPINT :PPTNT 
?* PPINT "L* P«PTF ENTERA DE ";X;" ES 
INTCX) 

80 PRIHT - PPINT PPINT GO TO 

Así. verá que la pane entera de 4..1K es 4. la de I.W es I, ¿j>ero qué pasa 
>i introducimos números negativos:' La definición di* putC entera de un nú lile- 
to es el prima número rnlrro tal que ti menor o igual i¡ur el número dado, y por ello 
-i X- —4.27 veremos aparecer en la pantalla el número —5. y si introducimos 
— 0.1 obtendremos — 1. ¿Por qué? Acabamos de dec irlo, la función INT devuel- 
m el primer número entero cuyo valor sea menor o igual que el argumento y 
—I < — 0.1. El impórtame que se fije en esto, pues es fácil equivocarse e inter- 
pretar que INT simplemente suprime la parte decimal del número, y es cierto 
que ocurre así con los positivos, |>ero no con los negativo». (Para salir del pro- 
grama anterior, m uerde que en un INPU T hav que pulsar las teclas RL N/STOP 
> KESTUKK.) 

Esta función es muy útil para evitar respuestas absurdas en nuestros progra- 
mas (no podemos comprar 1.32 coches). Su estructura general es: 



INT (X) 



X Argumento real puede ser una constante, una variable o una 
expresión aritmética Es importante observar que INT toma la parte 
entera de un número real, pero no lo convierte de número real a 
número entero (X%) 



La función ABS (viene de ABSOLUTK - ABSOI .UTO) se utiliza para ob- 
tener el valor absoluto de un número Valor absoluto de un número es el mismo 
número, pero prescindiendo del signo. Así ABS ( + 5)- 5 y ABS < — 5>=5. Cree- 
mos una máquina inieliernte: 

19 PFM 

>G REM ♦ l. R RDIVINRpnpñ BF SIGNOS * 

30 PEM 

40 PPIHT'TI" 

50 PPT NT "TECLEE UN NUMEPU POSITIVO 0 " + 
M NEGfinVt"i" ■ Mir-l.T ñ 



60 IF R=flBS<fl) THEN PPINT H> "É8 POSITIVO" 
?0 IF flOflBS<rt> THEN PRINT fl."ES NEGATIVO" 
30 PPT NT: PPT NT PRINT "ACERTE ?EH?" 
m PRINT : PRINT : FRINÍ *?OTRO NUMERO?" 
.1 00 GET Hí 

tl@ IF fl*-"S" THEN 40 

120 IF S*0-N« THEN fOO 

136 PPT Ni ff%BC15); "HfiSTfl OTPfl" 

U csrnirmra general de ABS es: 



AIiS(X) 



X Argumento real; puede ser una consi 


ante, una van; 


ible o una 


expresión aritmética. 







SGN viene ele la palabra SIGN (signo) y es como el complementario de ABS; 
en \v¿ de extraer el número extrae el signo. Esto es, sirve pam informarnos si 
el signn de mi número es el 4 ó el — Si el número es positivo, SGN devuelve 
un 1; si es negativo, un —1, y si el número es el rero. devuelve un « Así. SGN 
(—5)- — !. SGN(7)-I y SGN (0)-tó Kn el programa anterior podríamos ^he- 
larlas líneas riO y 70 para utilizar SGN en lugar He ABS. quedando en la lorrna: 

10 REM 

20 REM * OTPfl RDIVTNflPORfl DE SIGNOS # 

3© REM 

40 PPT NT "73" 

50 PPT NT "TECLEE UN NMMEPO POSITIVO 0 "> 

"NFGHTIVO" TNPIIT fl 
60 IF 3GN<fl<=0 THFN PPT NT fl.. 

"FS EL CEPO" 
S5 IF 3GN-rft> = l THFN PPINT fl. 

"FS POSITIVO" 
70 TF SGNvfl>*~1 THFN PPINT fl. 

"ES NEGATIVO" 
90 PPINT PPINT PPINT*'Rr.EPTE ^FH*>" 
90 PPINT ! PPINT ■ PPINT"?0TP0 NUMERO**" 
1*0 OET Rí 

110 IF fl$="S" THEN 40 

Í2g IF fl*0"N" THFN 109 

130 PPINT TflBC 15> . "HRSTfl OTPfl" 

FJ formato de StSfei es: 



SGN (X) 



X Argumento real, puede ser una constante, una variable o una 
expresión aritmética. 



V no podría faltar la función SQR. ¡Esto parece una calculadora' SQR pro- 
v ÍCDC riel inglés SQLARE ROOT (raíz cuadrada) y su empleo es de sobra cono- 
cido. Sin embargo, no está de má« que recordemos dos puntos: uno. debido a 
ba jíurticularidades de esta función, y otro, debido a las particularidades de los 
ordenadores. 1.a primera es. acuérdese, que no podemos hallar directamente 
|a tai/ cuadrarla de un número negativo (el ordenador no esiá preparado, toda- 
vía para trabajar con campos imaginarios), v si trata de hacerlo, obtendrá un 
mensaje de cr ™ r Il-I.KGAL QUANTITY KRROR. F.s fácil observar que no 
,. x Íste un número real que. multiplicado por sí mismo, nos dé un número nega- 

Rl otro punto lo comentaríamos al principio de esta sección. El ordenador 
no punir tomar decisiones por sí mismo, y si le decimos que la raí/ Cuadrada 
de 4 puede ser bien *2o bien —2. ¿qué hace?, ¿con cuál se queda? Kn princi- 
pio, el computador no puede enfrentar cuestiones de este tipo y sólo es capaz 
,u manejar funi «mes cuvo resultado sea único. Hasta ahora todas las Junciones 

Te hemos visto eran de'este tipo. Pues bien, en este caso la forma de resolver 
problema es muy simple: siempre loma como resultado la raí/ positiva. Asi, 
SQR (4)-^. SQR (9)-3. etc. 

lfl PFM 

20 PFM * Lfl FUNCION SGN * 

30 Pf M 

drt PPINT'TJ" 

50 TNPUT"TECl f-.E MN NUMERO" ;N 
53 PPINT PPINT PPINT 

60 IF SGN<N>— 1 THFN PPINT"N0 PUEDO "+ 

"CALCULAR NUMEROS NEGRTI V08 H ¡00T0 80 
rn PPT NT "Lfl RAIZ cuappapa PF ";N¿ 
" es " . sor < n ) ; " o ";-sqp<:n> 

«0 PPINT PPINT PPINT"?0TP0 NUMEP0?<S/N>" 
90 0ET A* 

100 IF flf="S" THEN 40 

110 IF flíO"N" THEN 90 

120 PRlNT-rr .TflBn! c i>;"HflSTR OTPfl" 

Observe cómo en la línea 60 utilizamos la función SGN para evitar la intro- 
ducción de numen» negativos. Resumiendo, la estructura a la función SQR es: 



X Argumento real positivo, puede ser una constante, una variable o una 
expresión aritmética ¡Cuidado con los números negativos' Origina- 
rán un mensaje de error. 



Y ahora a por LQG y EXT. LOG es la abreviatura de LOGARITHM (lo- 
garitmo) ¿Y que? Vamos a tratar de explicarlo en pocas palabras. En general, 
estamos acostumbrados a hablar de logaritmos decimales, y decimos que Y es 
igual al logaritmo decimal (en base 10) de X si 10 elevado a Y es igual a X. esto es: 

V=log 1(í (X). si 10Y.X 

Así, Iog. 0 l00»2, pues 10- 1 =10Q En resumen, Y es la potencia a la que hay 
que elevar el 10 para obtener X. Claro, ¿no? Pues, para simplificar un poco más 
las cosas, esta máquina no trabaja con logaritmos decimales, sino con logarit- 
mos neperianos. ¿Y qué es un logaritmo neperiano? Pues aquellos en los que 
la base es el número e, ¿Y qué es el número c? Vale, tranquilidad. El número 
e es basianie extraño. Su valor es próximo a 2.718281. Si ya lo conoce, no tendrá 
problemas con él. y. en caso contraria, no se preocupe, tampoco será algo fre- 
cuente en lili programas. Así que, siguiendo ton los logaritmos, el logaritmo 
nepeiiano (también llamado logaritmo natural) de X es aquel valor Y tal que 
e elevado a Y dé como resultado X. 

N*g,(X)-Y, si e v -X 

Si en sus cálculos necesita hallai el logaritmo decimal, utilice la expresión 
l,OG )W (X)- LOG(XyLOG(10). y si quiere hollar el logaritmo en otra l>ase cual- 
quiera, LOG A (X)-i.<x;(X>/i,<)(;(A). 

I.a función EXP, llamada función exponencial, sirve para calcular potencias 
del número e: EXP(Y)-e^ -X. Observe que esta función es como la inversa 
de LOG y asi: 

L(X;(LXP(Y))-L(X;(e v )-log r e v - Y 

l\s difícil explicar en general la importancia de estas dos funciones, LOG 
y EXP, que son casi omnipresentes en todas las áreas técnicas, pero s 
no las COIlOCé, no se desanime, no son necesarias para ser un buen progra 
dor. Si se atreve, varíe el programa anterior -LA I' UNCION SQR-. para calcu- 
la! LOG y EXP <le los números que el usuario teclee. El formato general de 
estas dos funciones es: 



acaso 
a* 



LQG(X) 



EXP (X) 



X: Argumento real, puede ser una constante, una variable o una expre- 
sion aritmética. 

LOG (Xí: No admite argumentos negativos ni nulos. Devolverá un 

mensaje de I LLEGA L QUANTITY ERROR. 
EXP (XI: X puede oscilar entre .88.1*29691. 



Para cerrar este apañado ramos a ver algo que no es una función, el número 
* (P'í- ¿Otro número?, pues sí, y también Varillo, x =3.14159265. y a pesar de 



^cr tan extraño es bastante útil. A todos nos obligaron a estudiar que el área 
,1c un círculo se calcula mediante la expresión «■«**, donde r es el radio, y que 
|a longitud de la circunferencia se obtiene del producto 2 • ir- r. Escribamos un 
programa calculador de áreas v longitudes: 

10 PEM 

:-h pem ♦ el pev de los circulos * 
30 reH +*********+*************** 
4* PPINT'TT 

5« IMPUT" TECLEE EL RADIO" ;R 

IF R<0 THEN 40 
70 PPINT .PPTNTPPINT 

fífl PPINT"EL RPER DEL CIRCULO DE PfiDIO" 
85 PPINT p;*'ES":ff*PT2 
90 PPINT PPINT PPINT 

\M PPTNT"IR LONGITUD DE Lfl " + 
"CIRCUNFERENCIA" 

IOS PRINT"DE RADIO" ;R;"ES%2*«*R 

IIR PPINT PPINT : PPINT "OTRO NUMERO? CS/NV 

120 GET A* 

1?9 IF H$="S" THFN 4* 

140 IF flSO"N" THEN 120 

¡SO PRINT'TJ" PPINT TRB<13>; "HASTA OTRA" 

Y ahora a |Kir las terrible* íuiu iones iiíguiiomcirkas. 



FICCIONES T»IGONOMÍT«CA5 

Todos hemos sufrido la irigonometría. y el ordenador nos va a hacer sufrir 
un poco mb, pues para utilizar las funciones disponibles tenemos que introdu- 
cir los ángulos rn radianes y no en grados, que es a lo que estábanlo* acostuiu 
litados. Las funciones disponibles son: 



SIN (X) 



CÜS (X) 



TAN (X) 



para expresar, respectivamente, el seno, coseno y tangente del ángulo X. Pero, 
• orno acabamos de indicar, el argumento no lo podemos expresar en grados, 
sino en radianes. ¿Y qué es un radián? Un radian es el ángulo tal que el sector 
dr circunferencia que abarca tiene una longitud igual a r (ver rig. -í-2). 



SIN— seno; seno cr-a/r 

COS— coseno; cost-no a = b/r 

TAN — tangente; tangente <*= (sena/cosa) = a/b 




ü- I radián 



l-i' 3.2 [Wmh.i/t* ili UtgMnmiirlifj 

La mejor turnia ÓjC no equivocarse al utilizarlo r> moldando que un ángulo 
de ÍM9" equivale a un ángulo de rf'2 radianes (¡el famoso número ir!), o que uno 
de IHO" es igual a uno dé jr radianes. Por ello, si queremos calcular en radianes 
un Angulo ne a grados, utilizaremos la expresión; 

Radianes ■ a'w'iHO 

Olr.i función ii igonuiuéli ii .1 disponible es. 



TAN (X) 



que es la abreviatura de narco cuya tangente es X». Esto es, si introducimos 
un número real X nos devuelve el ángulo, en radianes, del arco cuva tangente 
vale X. Si usted es hábil en trigonometría podrá construir, a partir cíe estas fun- 
ciones, toda clase de secantes, coset antes, etc.. e incluso cosenos hij>ert>óli< os 

Y si no es hábil en trigonometría y además ha sido capaz de leer todo esto, 
enhorabuena y no se preocupe, no todo el libro es así, y para demostrarlo vamos 
a entretenernos con la relajante y misteriosa función RND. Trate de dominar- 
la, pues le permitirá construir toda clase de juegos para disfrutar con sus amigos. 

La generación de números aleatorios 

La abreviatura RND viene de la palabra inglesa RANDOM (aleatorio). Con 
esta función podemos generar al azar (aleatoriamente) números en el intervalo 
(ft 1); esto es, cualquier número entre el 0 v el I. pero nunca el 0 ni el 1. Por 
^^'o^^demos conseguir números como e! «82774380!. 0187534367, 



Pero, ¿qué es eso de generar números al azar? Consideremos el lanzamiento 
de un dado. Sabemos que el resultado de lanzar un dado será un número entre 



«■] ] y el 6, pero lo que no podemos afirmar es qué va a salir la próxima vez 
que lo lancemos. Lo único que podemos afirmar es que será un número del 1 
al ó. Pues bien, esto es lo que recibe el nombre de generación de números al 
azar. Cuando utilizamos RND vamos obteniendo números entre el 0 y el 1, pe- 
ro no sabemos qué número aparecerá la próxima vez. 

Vamos a probar con un ejemplo. Introduzca: 

■ 10 PRINT RND (1) 

Y ejecútelo, verá aparecer en el margen izquierdo de la pantalla un número del 
tipo 0776433747. Hágalo varias veces y verá cada vez un número distinto, pero 
del mismo tipo. Trate de adivinar cuál será el próximo número. Falló, ¿verdad? 

Añada al programa anterior la línea: 

20 GOTO 10 

Y al ejecutarlo vera aparecer una ristra de números sin ninguna relación af- 
rente entre ellos. Esto es generar números al azar. 

LOl números aiiarccen en la pantalla a gran velocidad y casi es imposible 
leerlos. Si desea raleniizar esle movimiento, pulse la tecla CTRL, y mientras 
la mantenga pulsada vera aparecer los números más despacio. Si la suelta, vol- 
verá a adquirir velocidad. Pulse y suelte varias veces para practicar. (Esto es vá- 
lido también para observar el listado de un programa.) 

Ahora vamos a tratar de simular en el ordenador el lanzamiento de un da- 
do. Teclee el programa siguiente: 

« pfm ♦ LANZAMIENTO DE UN DflBO * 

4.t PRINT"T* 

60 P=fl*6 
m «:=JMTÍP> 

1 1 1 PR I NT " *W"IWWWPIW" 

l«n PRINT TRB< 1*. .ti 

110 PRINT "PRINT muí PP'lHT 

[29 PRINT B ?OTPO I RH7PMIEHTn--.'S/N>" 

! n GET !F p$="*t." THEN 40 

149 IF PÍO"N" TK-N 13© 

150 PRINT : PRINT? PRINT TRB O 5 ■ ¡ "HflSTfl üTPfl" 

Cada vez que ejecute este programa obtendrá un número del 1 al 6 en el 
centro de la pantalla. Pero no conocemos de antemano cuál será el próximo nú- 
mero que aparecerá. 

La explicación del programa anterior es muy sencilla. Queremos generar 
números enteros del ¡ al 6, pero la función RND (1) genera números reales del 
» al 1 (nunca el 0 ni el 1). del tipo 0847325437. ¿Cómo hacerlo? Bien, en la 
linea 50 introducimos en A el valor generado por RND (1). Si este número (com- 



prendido entre el 0 y el 1) lo multiplicamos por 6, obtendremos un número en- 
tre el ft v el 6 (nunca el 0 ni el 6). Por ejemplo, el 025 se convierte, aJ muid 
por 6, en el 1.5Q el fl5 en el 3, el 075 en el 4.5, etc. En la línea 60 introd_ 
este valor en B. Pero un dado no genera números del tipo 2.754324375. 
es, tenemos que conseguir números enteros entre el 1 y el 6. Para ello u 
mos en la línea 70 la función INT. Recuerde que INT toma la pane entera 
un número. Así INT (2.7543243757) = 2. De este modo, en la línea 70int 
c irnos en C un número entero del 0 al 5. Finalmente, lo único que necesitamos 
para conseguir nuestro dado es sumarle un 1 a C, y así el valor de D será un 
número entero entre e! 1 y el 6, que es lo que imprimimos en la línea 100 

Las líneas 5tt 6tí 7tt y 80 del programa anterior las podemos sustituir 
la línea: 

50 D-INT(RND(l)-6) + I 
La estructura general de la función es: 



RND (X) 



X: Argumento real Su valor influye en la sene de números generados. 
En general, pare un X dado, cada vez que encendemos el ordenador 
se generaré la misma serie de números Las excepciones son RND 
(0) y RNO (TI), pues en ambos casos se utiliza el estado del reloj 
interno pata determinar la sene a generar 



Si, por cualquier motivo, deseamos volver a utilizar la misma serie dr numere* 
aleatorios hemos de introducir, antes de la generación, un RND con argumento 
negativo. Así, el programa: 

10 PEM ***#********* 
20 PEM * ME PEPITO * 
se REM **#**#*#*#### 
4'G fl=RNTj'-l> 
se FOR 1=3 TO 5 
M PPTNT T. RNB<t3 
m NEXT I 



imprimirá en la pantalla los mismos números aleatorios cada vez que lo ejecute- 
mos. Para otro argumento negativo, por ejemplo, —2, la secuencia a repetir se- 
rá distinta. 

Finalmente, para terminar esta sección, vamos a diseñar un programa para 
jugar a los dados contra el ordenador. Empezaremos con una cantidad de dine- 
ro, pongamos 20 pesos, y después el ordenador nos pedirá que apostemos a un 
número del 1 al 6. Tras aceptar nuestra apuesta, generará al azar un número 
del 1 al 6 y nos dirá cuál ha sido nuestra suerte/ 



ti=i PFM ****************** 
20 PEM * TUECO PEL DADO * 
PEM 

4¿ CAPITRI = 1 Ofi 
50 PPINT'TT 

60 PP-IHT PPINT:P(?IHT TAB' 1 6> ! "DISPONE " + 

"DF":CAPITRL;"PTS" 
;n PPINT PPINT TRr>'10>; 

"^CUANTO fiPUFVTR"; 
30 INPMT RPHE-. 

90 IF RP"FS<0 np RPHFSX:RPTTAI 
THEN 50 

l,-iO PPIUT PPTNT JPSB<S>; H ^H OMF NUMFPO'".: 

105 OFT R* IF flf=""THEN 10?. 

110 IF RSC-'Hf > €49 OP flSC<fl*»54 THEN 105 

120 R=VRL-'R*> PPINT R 

1 38 PEM ♦■♦♦♦♦♦♦******♦♦**♦♦******+♦♦ 

140 RFM * M=VUF1 TAS QUE DR EL PflPn * 

i'.n pfm 

] ge M= INT ■ PNP r> * 1 00 > 

|63 PPINT PRINT PPINT PRINT PPINT 

170 FOR 1=1 TO M 

1*0 t'=INT''PNDa >*6>+l 

L90 FOR »=I TO 500/íM-I+l> : NEXT T 

PPIHT"T* • TRB<20) , D 
71R MEXT I 

?20 PPINT : PRINT : PRINT 

P'-:r if n*R THEN PRINT TRB<fii ; "HA GflNRDO" 

:flPUES#3; "PTS" -0=1 : P=0 
246 IF POR THEN PPINT TflR<:6> ; "HA " + 

"PERDIDO"; APUES; "PTS" G=0 P=1 
250 CRPI TAL=CAPI TflL+CG#5-P>*HPUES 
268 PPINTPPINT^PRINT 

270 IF CRPITAL=0 THEN PRINT TflB<¡3>;"SE » 

+ "HR ARRUINADO" :G0 TO 310 
¿80 PRINT" AHORA TIENE" ¡ CRPI TAL ¡ "PTS. " ¡ 

"OTPfi RPUESTR''S/N>'>" 
230 GET Pt IF RÍ="S" THEN 50 
308 IF R$0"N" THEN 299 
310 END 

La linea W se encarga de comprobar que no se puede apostar una cantidad 
negativa y que no juege más dinero del que tiene. De que no engañe al ordena- 
dor, apostando a un número distinto de los del dado o a una letra, se encarga 
la línea Ilfl Pero quizá lo más curioso de este programa se desarrolla en las lí- 
neas 16fr218 Con ellas tratamos de simular en pantalla el lanzamiento de un 
dado en una forma muy sencilla. Seguro que usted puede mejorarlo. En la línea 



Hit* SC genera al azar el número de vueltas que tiara el dado, las primeras 
las son más rápidas y poco a poco el movimiento se ralentiza hasta que el 
se para. La línea 190 írala de llevar a cabo este cfccco. Por ejemplo, supo 
que hemos obtenido M = 5fl Así, para la primera vuelta. I-I. el -valor fin 
del bucle l'OR que señera la pausa, es de 500/(50* ! — 1)- lft mientras que 
la última vuelta, 1 = 564 esle valor es de 500 .'(50 — f»0+ 1} 500 Kn el resto" 

Írograma se realiza la impresión de los resultados y se pregunta si se desea 
zar otra apuesta. Fíjese en la torrna de calcular el nuevo capital. .Según si 
acertado o no, las variables (i (ganar) y P (perder) toman l<m valores G = l. 
P = 0 ó G - 0 Y P-l. l)e este modo, en la línea 250 se utilizan estos valores 
calcular el nuevo capital a partir del anterior y de la cantidad apostada- 
mente, hubiera sido más sencillo prescindir de la* variables G y P y utilizar 
línea 240 tal como: 




240 CAPITAL -CAPITAL + (— (A-D)-5-(A< >D))-APL'KSTA 

Reí -nenie que si una relación es cierta, el ordenador la evalúa como un — 1, 1 
y ?i es falfia, la evalúa como un fl Observe que si aticna. la máquina le premia | 
con una cantidad igual a cinco veces su apuesta. ¡Animo! 



FICHEROS DE DATOS 

l\l objetivo principal de la informátii a es la manipulación de grandes tanti- 
dalles de dalos. Por ejemplo, en una escuela habrá que manejar los números 
de matrículas de los alumnos, sus mimbres y direcciones, edad, historial acadé- 
mico, ele. Hasta ahora hemos dedicado nuestro es fuer /o a aprender las estruc- 
tutus <lí' que disponemos para < nnstitiiir pr» ■ : i uta* r itu 1um> y.i sal>eiiios • ómo 
i rear fil herró dC programas en la Datassciie. IV etft modo iremos ihscñ.irulo 
programas y grabándolos en la i inta pata volver a ulili/arlos cuando los necesi- 
temos. Vamos a dedicar esta sección a introducir estructuras avanzadas para el 
manejo de dalos y para estudiat cómo crear ficheros de datos, nombres, direc- 
ciones, etc.. en la Datasseltc, 

Variables con Indices (listas y tablas) 

Suponga que necesitamos diseñar un programa para introducir las notas de 
los alumnos de una clase, pero queremos que cada nota esté en una vanable 
distinta, no acumularlas en una sola variable, para luego sacar la media como 
hacíamos en el Capítulo anterior. Evidentemente, si utilizamos las variables que 
ya conocemos nos quedará un programa terriblemente complicado y engorroso. 
Pruebe a hacerlo. Alobunadamente el lenguaje BASIC nos proporciona otro 
método para hacerlo: las variables con índices (ver Fig. !í.3). Intuitivamente, 
una variable con un índice es como un conjunto de rasillas contiguas en cada 
una de las cuales tenemos guardado, o podemos guardar, un dato Así, 
lijándonos en la figura 3-3, 



nombre de variable: A [ 15 | 4:t | t.7 | 85.4 | | 



I — I 2 3 4 

FÍ S 1.1 C o nap W rmuKivu Oc variable con ímli.r 



tí 1c decimos al ordenador PRINT A(l). saldrá un 15 en la pantalla, pues éste 
c*el contenido de la primera casilla «le A. y si le decimos PRINT A(4). impri- 
mirá el número 85.4. 

Claro que. en general, antes de utilizar una variable con un índice (las va- 
riables ron un solo índice se suelen llamar listas), tenemos que indicarle al or- 
denador de cuántas casillas va a constar para que pueda reservar espacio de 
memoria para contenerlas. Esto lo conseguimos con el comando DIM. Por ejem- 
plo. DIM A<50) nos permite utilizar la variable A(I) con l variando hasta 50 
Como siempre, el mejor método de entenderlo es con un ejemplo: 

10 REM 

P PEM ♦ NOTAS PE UNA CLASE * 
30 PFM 

40 PRINT "IT 

90 PPINT PRINT ¡ PRINT 

"CHANTOS ALUMNOS T I ENE " '■ 
r=A INPUT N 

?n PEM ♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦***♦#***##*# 

80 PFM 4 INTP0HUCCI0N BF LAS NOTAS * 
qp, pEM *♦*♦♦♦♦♦**♦*♦♦*♦♦■♦♦♦♦♦♦♦***•♦> 

100 niM A'N> 

118 POP 1=1 TO N 

1¿>* PPIUr PPINT"NOTA DEL"; T; "ALUMNO"; 

i?o r npi.it fl<n 

148 NEXT I 

PEM !*#*»«»*»**♦*♦♦♦♦♦*'*****♦♦♦♦ 
160 PFM ♦ CALCULO DE LA NOTA MFDIA * 
170 PFM ♦♦******♦*♦♦'♦♦♦♦"♦♦♦*♦**'♦♦*♦♦ 
l*Pi F'lP 1 = 1 TO N 
1*0 ?UMA =SUMA+Aa> 
200 NFXT I 

210 PPINT PPINT PPINT 
?20 PPíMT"LA NOTA MEDIA Vf mS"¡N. 
"ALUMNOS ES'SSUMrVN 

Observe que con una sola variable A(I) podemos introducir y guardar las 
notas de 40 50 ó 1000 alumnos. Además, el programa vale para cualquier tama- 
ño de clase, pues lo primero que hace (línea 50) es preguntarle cuántos alumnos 
tiene en laclase. N. y tras recibir su respuesta. la línea 1M0 reserva espacio en 
la memoria DIM A(N) para poder almacenar las notas de todos sus alumnos. 
Las líneas 110-140 se ocupan de introducir sucesivamente las notas de los alum- 
nos, indicándole en cada momento el número del alumno al que se está refi- 
riendo. Fíjese qué fácil y qué sencillo y trate de imaginarse lo que sería eslo 
si utilizáramos variables sin índice. 

Ahora ya tenemos las notas guardadas en la memoria de la maquina y po- 
dernos hacer con ellas lo que queramos: sacar un listado de las notas, calcular 
la media, etc. Como ejemplo, en el programa anterior las líneas 180-220 se cn- 
targan de leer las notas guardadas cnA(I) y calcular e imprimir la media. 



La estructura general de la semencia DIM para listas es (DIM viene de 
palabra dimensión). 

DIM N(I) 



I Es un argumento numérico que bien puede ser una constante, una 
variable o una expresión cuyo resultado sea numérico. 

N Nombre de variable tiene las mismas reglas de construcción que las 
variables sin índices y pueden ser bien de variable real, por ejemplo 
N. de variable entera, N%, o de variable alfanuméfica. N$. 



P.ii.i practicar un jmh'o más vamos a escribir un programa que pida l< 
nombres y las notas de las evaluaciones de los alumnos. Al final calculará 
nota mecha de cada alumno e imprimirá en la pantalla el nombre del alumno 
su oota final* 1'iilizaremos las variables NS para los nombres, la Al pai 
las notas de la primen evaluación, A'J paia las de la segunda y A3( para L 
de la tercera. Al linal introduciremos la nota final de cada alumno en f 
pasaremos a imprimir los resultados. 

10 PEM Sim**^*^******** 1 * 
21? RFM * MAS NOTAS MEDIAS * 
30 PEM **##**######*»****** 
40 PRTNT'TJ" 

59 INPUT "NUMERO DE AUJMNOS'';N 

60 IUM N*(N > > A í < N ) .fl2<N> .R3<N^F<N) 
70 POP 1=1 TO N 

75 PRINT ,, T 

80 PPT NT "NOMBRE V RPFI.LTDOS DFI " ■ T . 

"AL UMNO" 
?0 INPIJT Ü$<1> 

100 PR I NT í PR I NT "NOTA PE EVRl UACION 1"; 
1 10 1NPUT HKI) 

120 PPINT:PRINT M Ni:iTA DE EVALUACION 2"; 
130 INPUT A2<I) 

140 PPINT : PRINT"NOTA DE EVALUACION 3"; 
150 INPUT R3<I> 

160 F< I )*<fll C I )+fl2C I >+R3<I»/3 
170 NEXT I 
180 PPINT"."]" 
190 PEM 

200 PEM * IMPRESION EN PANTALLA * 
210 PEM 

220 FOP 1=1 TO N 

230 PPINT: PPINT "ALUMNO: -;N*U) 
249 PRINT"NOTR FINAL" J FC I ) 
259 NEXT I 



Observe cómo en la línea 60 realizamos varios dimensionamicnlos y líjese 
en que están separados por comas. El resto del programa tiene poco más que 
, umentar. Quizá sería interesante introducir una variante para, tras escribir unos 
cuantos nombres, salir del primer bucle FOR y sacar un listado de los nombres 

almacenados. Pero recuerde que si en un programa ya ha introducido algu- 
nos nombres y se interrumpe la ejecución, por ejemplo, pulsando RUNVSTOP 
v RESTORE, si vuelve a ejecutar el programa RUN. borrará lodos los datos 
que tenga introducidos. 

Claro que si antes manifestábamos la necesidad de utilizar variables con un 
índice, debido al engorro que sería utilizar una variable para cada dato, ahora 
parece lógico esperar que si, además de tener una lista de clientes, tenemos una 
serie de datos para cada cliente, dispongamos también de alguna estructura pa- 

' con dos £5££ íffiSS?4? C aqU! ^ d t0n " P, ° ^ 
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r« 3.4 Cumepto .mumvo de v«r»t* 



.un dui fndiee» 



En rada fila tenernos a un cliente (en este caso alumno), y a esto se le llama 
lidia. Cada lidia tiene varios campos, tantos como indiquemos con el índice 
J v en t atla campo guardamos un dalo sobre el cliente. Así, en el canino 1 (J - 1) 
de la primera ficha (l-l) leñemos guardado el nombre (Manuel) del primer 
alumno, y en rl campo M (M tendrá cierto valor) de cada ficha tenemos guar- 
dada la nota final de la clase. Recuerde que I se refiere a la fila y J al campo. 

Con este nuevo bagaje vamos a atacar otra vez el ejemplo anterior. Tendre- 
mos un fichero K$(1J), donde I es el número de alumnos y J es el número de 
< ampos de cada ficha. Pongamos, para este ejemplo, que tenemos 7 campos 
-NOMBRE... -I. APELLIDO". «2. APELLIDO-, -1. EVALUACION». «2. 
EVALUACION-, «3. EVALUACION-, y «NOTA FINAL». Estos son los títu- 
los que ramos a poner a los campos y es muy importante para conocer en cada 
momento qué dato estamos tecleando. Compare su solución ron la siguiente: 

10 PEM 

20 PEM * FI CHEPO PE ALUMNOS * 

39 PEM 

40 PRINT "IT 

58 INPUT"NUMEPO DE ALUMNOS" ; N 



'&S PIM N$<N*7>»T#<7) 

TZ T*<i>= s "NOMBRE M T*C2>«M. APELLIDO" 

TÍ<3'' = "2.RPELLirO M 
75 Jé <4 >* u 1 , EVflLUfC I ON " - 

T*'5>="2. EVALUACION" 
30 T$v 6 > = '*3. EVALUACION": 

W7)="N0TA FINAL" 
90 FOR 1 = 1 TO N 
95 PPINT'TT 
100 FOP J=t TÜ 3 

llf) PPIMT:PRINT T*<J>+" ÜFL" ! I ; "ALUMNO" ; 
126 INPUT N*<I>J> 
130 NEXT I 
140 PRINT" 3" 

lf.0 pRlNT?PRIWT H flLUW^: ,, +N*<Iil>+ M " + 

N*<I,2>+ M "+N$'I,3> 
lSCí Fnp .T=4 TO 6 
170 PPtNTPPINT TAB<5> ; Tí <J>i 
180 INPUT N$ÍI*J> 
190 NÉXT T 

?m N*< I / 7) =STR* < < VAL (N*< I * 4»* 

VflL<N*< I • 5> )+VRL<N*< I > 6) ) >/3> 
210 NEXT I 
220 REM 

230 REM * IMPRESION DE NOTHS FINALES * 
240 REM #**#***#******«#♦#*#******#*#* 

260 FOR 1-1 TO N 

•V. r . PPINT'TT 

270 FOR J=l TO 3 

280 PRINT N$<I - ¿>i " " ■ 

299 NEXT J 

300 PRINT ; PRINT TAB<8> ; T$(7>+"=»+NSv I , 
310 PRINT : PRINT : PRINT ¡ PRINT 

320 PRINT "DESEA PASAR AL ALUMNO " + 

■•SIOÜIENTÉCS/NX?" 
330 GET R* 

340 IF P*="N" THEN 399 
350 IF R*0"S"THEN 330 
360 NEXT I 
399 ENP 

lisio ya es algo más complicado. Pura almacenar iodos los dalos, ya sean non 
brea o notas, hemos utilizado una tabla allanumcrica NS(IJ). Los títulos de I< 
campos los hemos guardado en una lista alfanumerica T$£j). Evidcntcmem 
los poílríamos haber guardado en variables alfanumérieas separadas, pero est 
imposibilitaría la sencillez de los bucles que utilizamos posteriormente. Lo qx 
sí hubiera sido importante es no asignar los títulos de los campos dentro del pn 
grama (líneas 70 v 80). sino utilizar un bucle FOR y un INPUT para pedir 



.il usuario que introduzca los títulos que quiera; pruebe a realizar esta modifi- 
cación. El resto del programa se dedica a realizar la introducción de los datos 
\ .i la impresión de los resultado;- finales. Estudie el programa con detenimien- 

pues hay muchos detalles que podra utilizar en sus propios diseños. En la 
|[nea 'i20 introducimos una nueva variante. En esta parte del programa, línea 
2 J0-399. se realiza la impresión de los resultados, y en lugar de dejar que apa- 
rezcan uno detrás de otro, sin |MtsÍbílidad de leerlos (aunque sabemos que pul- 
sando la tecla CTRL la velocidad se ralcntiza). le preguntamos al usuario sí 
desea ver el alumno siguiente; si no es así. la lina 340 se encarga «le sacarnos 
del bucle, y, en caso contrario, se borran de la pantalla los datos del alumno 
anterior y se imprimen los del siguiente. 

Una variable puede tener más de dos índices; por ejemplo, podríamos utili- 
zar una variable numérica con tres índices N(I. J, K). para almacenar posicio- 
nes en un espacio tridimensional. Es decir, esto aún es imaginable, pero es mucho 
más difícil tratar de imaginarse el funcionamiento de variables con cuatro, cin- 
co o más índices. Por tanto, podríamos resumir que la estructura general de la 
sentencia DIM es; 

DIM N(I. j. K. ...) 



I. J. K. .... son los índices y han de ser valores numéricos: constantes, 
variables o expresiones aritméticas. 

N es el nombre de la variable y sigue las mismas reglas que en el caso 
de variables normales. Esto es. para variables enteras hay que terminar 
el nombre con el símbolo %, y con variables alfanumérieas. con el 
I. 



Además es bueno recordar los puntos siguientes: 

1. Si realizamos DIM AíM). en realidad se reservan M + l « 
A. mies también se puede utilizar A(0). Sin embargo, no es 
Mv) en los programas. 

2. Si pasamos, denim de la ejei ución de un programa, dos veces por el 
mismo DIM, obtendremos un mensaje de error. No podemos dimensionar algo 
que ya está dimensionado. 

3' Si dimensionamos la variable DIM A ( r >0) y después nos equivocamos 
v tratamos de utilizar, por ejemplo. A (54). obtendremos un mensaje de error. 

1. Podemos dimensionar con un "ómero no entero, pero el C-64 tomara 
la parte entera antes de dimensionar. esto es, DIM A (16.7) equivale* DIM A (16). 

5. Variables con menos de cuatro índices, por ejemplo. A (I. J). en las que 
los índices no vayan a tomar valores mayores de Ití esto es. 0s I s 10 0S.J s Ift 
no necesitan ser dimensionadas. El C-64 reserva espacio para estos datos en tanto 
que intentemos utilizarlas. 

El programa anterior es un ejemplo de introducción de datos en un fichero, 
que será de utilidad para cualquier tipo de base de datos que Queramos cons- 
truir, por ejemplo, clientes, el estado de cuentas; productos en el almacén, can- 
tidad, precios, entradas y salidas diarias; colección de discos, lipo de música, 
autor, título, etc. Sin embargo, en muchas ocasiones más que sacar un listado 
lo que deseamos es buscar datos de una sola ficha. Por ejemplo, refiriéndose 
al programa amerior, deseamos buscar las notas parciales y final de cierto indi- 
viduo," para ello podíamos sustituir las líneas que se ocupan de sacar el listado 
por las siguientes: 



1010 PEM LISTADO SELECTIVO * 

1 020 PFM***if**if ************************ 
1030 PRINVT1" 

UM9 PPT NT PPT NT "DESEA VER ALGUN ALUMNO ££/H>? 
1050 GET P$: TF P$="N" THFN 1999 
1060 IF R*<>"S'' THEN 1050 
10?0 PRINT"n M 

1980 PRINT : PRINT : PPINT"NnMBRE" ■ INPIJT Ni 
1990 PRINt •• PRINT" 1 . APELLIDO" ; • INPUT Al$ 
1100 PRINt PRINT"2. APELLIDO" i • INPUT R24 
1110 FOR 1=1 TO N 

1120 IF N*CM>=N$ ANP N$<I.?'=A1* ANP 

N*a/3>«TOf THEN 1150 
1130 NEXT I 

1140 PRINT : PRINT : PRINT " NÜ FNCUENTpn NINGUN 
ALUMNO CON FSE NOMBRE" GOTO I0df. 

1150 PRINT ; PP 1NT PRÍNT LEFTf< Tf<T4> . 9> , LFFTS 
< T$í!5> .9> • LEF T*<T$<6> , 9> , LEFT$< T 

1160 PPINT:PPTNTN*.'I,4^N*<I.5^N*n-6>.Níá,7: 
1170 I50TO 1040 
1999 END 

I es una rutina lát tímente manejable y adaptable a cualquier caso j. 
rular í'n las líneas IflRGMlCW se pregunta el nombre y apellidos de la per 
buscada, y las líneas 111*1130 se encargan de reali/ar la búsqueda. Si en 
Chero no existe ninguna persona con estos datos, el ordenador le informa {. 
1140) y cede el control a la línea 14H0 por si desea buscar a otra persona, 
búsqueda tiene éxito, las líneas 1150 y 1160 se encargan de imprimir los < 
en forma ordenada. Recuerde que la coma divide a la pantalla en cuatro z 
de impresión cada una con 10 caracteres, por ello empleamos LEFTS (T 
9), no vaya a ser que tengamos títulos demasiado largos que nos estropet 
presentación de los resultados. Otra norma puede ser la de poner al prim 
del programa, en la introducción, unos controles para que tanto los titule 
los campos como su contenido no sobrepasen unos límites prefijados. 

Fíjese en que en el mismo programa hemos utilizado la variable con ím 
^(U) V ' a variable normal Ni. El Commodore le permite esto y distingue 
fectamcnle entre ambas variables. F.n las líneas 1060-110fl antes del símbol 
dos puntos que separa el PRINT del INPUT, hemos puesto el símbolo de | 
to y coma «;», para que el cursor del INPUT aparezca justo a continua 
de la pregunta formulada con el PRINT. 

Y para terminar de practicar con las variables con índices vamos a prese 
un algoritmo que será casi imprescindible en un programa de gestión de d; 
Un algoritmo de ordenación. Hay diversos algoritmos de ordenación, pero 
no hay lugar para exponerlos todos o para medir sus ventajas o desvent- 
Supongamos que tenemos un fichero A( ) de números que deseamos ordena 
menor a mayor c imaginemos el peor de los casos: están justo al revés. 



A(5) ¿7 73 | 45 | 23 11 



12 3 4 

Fig.3 5, L¡«» ordenada al re** 



Empecemos por comparar los lugares 1 y 2; si el número que hay en I es 
menor que el que hay en 2, ya están ordenados. En caso contrario procedere- 
mos primero a cambiarlos y después pasaremos a comprobar si los números que 
rstan en los lugares 2 y 3 están ordenados. Observe que si en la primera compa- 
ración hemos intercambiado los números A(l) y A(2), en la segunda compara- 
ción, entre A(2) y A(3), el número que hay en A(2) es el que antes estaba en 
Para iniercambiar los números se utiliza una variable auxiliar, que en este 
caso llamaremos CAMBIO, que sólo sirve para esto, para ayudar en el cambio 



CAMBIO 



A(J) \J ACM) 

IF A(J) >A(J + 1)THEN CAMBIO-A()*l): A0 + 1)-A(J): 
AO)- CAMBIO 

Pli I P»»» p*m iinmanilti« "«mrnido de la* anilla* 



En la figura siguiente se exponen todos los pasos necesarios para la ordena- 
ción, Primen) comparamos las casillas A(l) v A(2), si hace falta se realiza el cam- 
bio, v después pasamos a comparar las casillas A(2) y A(3), y así sucesivamente 
hasta comparar la A(4) con la A(5) y realizar el cambio, si es necesario. Observe 
que, iras la primera vuelta, estamos según» de que el mayor número, en este 
• el 87. ocupa la última casilla 
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F«g 3.7. 



Tras esto empezamos la segunda vuelta y comparamos la A(I) con la A(2), 
la A(2) con la A(3), la A(3) con la A(4), y en este caso ya no hace falta comparar 
la A(4) con la A(íi), pues en la primera vuelta pusimos el mayor en la A(5) y 
en esta segunda vuelta hemos colocado el segundo mayor en la A(4). Tras rsto 
se concluye que en cada vuelta hay que hacer una comparación menos, pues 
sabemos que por lo menos tenemos ordenado un número r" 
ro de elementos a ordenar es N y estamos en la vuelta 1. 
ción necesario es N-I. 
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Todo estQ l<> podríamos cxpresai en el programa 

10 PEM************* *#*"4i*#*********#**** 
SO REM# ORDENACION PF t ISTttS ♦ 

4* PRINT M T 

60 RÉM* INTRODUCCION DE NUMEROS ♦ 
?rt RFN4 

80 PRINT 1 ' CÜflNTOS NUMEROS Vfl fl INTRODUCIR" i 
90 TMPUT N¡ PIM FKN> 
ipici pnp T = 1 TO N 
iet c . PRTNT M n" 

t.10 PRINT" FECLEE EL"; I : "NUMERO" 
120 TNPUT FKl) 
1,30 NEXT I 

140 PRINT "LOS NUMEROS INTRODUCIDOS SON" 
1 50 FOP 1=1 TO N 

160 PRiNT w p< M ;i; M >» í, ;ftci) 

170 NEXT I 

180 PRINT W SI PE SER VERLOS ORDENADOS" 

!90 PFINr'PULSE CUALQUIER TECl fl" 

200 OETPÍ : IFPt="""RPf=rHRí í 13>THEN 200 

210 REM********# *********************** 

220 REM*# ORDENACION #* 

£30 REM********#**#**#****.f 

240 FOP 1=1 T0 N-t 

250 FOP J=l TO N-I 

2*50 IF A<J»flM+l> THEN CRMBI0=Fi.'.J+l>: 
R- t*l>sRtJ) :R<J>*CRr1BIÜ 



278 NEXT J 
280 NEXT I 

290 PEMr***:********-***^ 

300 PEM# LISTR ORDENflDR * 

?10 REMr#*#**«****#**f 
320 PPINT'TT 

•:?0 PPINT"L0S NUMEROS OR PENADO*: SON" 

^40 FOP 1=1 TO N 

350 P*INT"R< ";!;">»"; fl< D 

360 NEXT I 



En la primera parte, líneas 10-17*4 te realiza la introducción y visualización 
de \as números a ordenar. Ksia labor de imroducción es muy pesada, así que 
lo mejor, una ves introducidos y ordenados los datos, es grabarlos en algún dis- 
positivo de almacenamiento, cinta o disquete, como veremos posteriormente. 
En las líneas 18ft2Wsc le pregunta si desea verlos ordenados. En cuanto pulse 
una tecla comenzará la ordenación. Claro que si no desea \erlos ordenados, no 
nene más remedio que pulsar RUN/STÜH y RT.STORE oara interrumpir la 
ejecución del programa. Trate de arreglar esto De la ordenación se ocupan 
l.ts líneas ' HV.\:0 F.n la línea 240 el índice I varía desde I a N-l. Como vimos 
en la figura '3.8. si leñemos N dalos a ordenar, tenemos que dar N-l vueltas, 
l.n i-l ejemplo de la figura 3.R teníamos cinco datos y. |Kir tanto, el número 
de vueltas era cuatro I.a línea 2!)ftse encarga de realizar el número de compa- 
ra* iones necesarias en cada vuelta. Como hemos visto en las 11 guras, en la vuel- 
ta I tenemos que realizar N-l comparaciones I.as líneas 290- 360 se ocupan de 
la impresión de los datos ordenados, y si ha introducido muchos números, re- 
cuente que para ralentizar el listado debe de pulsar la redi CTRL. 

< )tni problema es el de ordenar lisias alfabéticas. Por ejemplo, ordenar alfa- 
bétH amenté los nombres de una clase. Parace más complicado, pcio ¡wiia el or- 
denadoi es lo misino. Ln la línea 2Ü0 lo único que cambiaría serian los nombres 
«le variables. que tendrían que ser allanumcricas. Cuando el ordenador compa- 
ra dos apellidos, por ejemplo: 

GARCIA 

GAROES 

\a comparando letra a letra. Recuerde que las letras tienen un número de códi- 
go, el de la A es el 65. el de la B el 66. etc. El ordenador lo que compara es 
i I número de código, y por ello, en el ejemplo de (JARCIA y GARCES, como 
la primera letra coincide se pasa a la segunda y luego a la tercera, cuarta, y al 
llegar a la quima, la E es menor que la I (refiriéndonos a sus números de códi- 
go), y por ello sabernos que G ARCES ha de ir delante de GARCIA. Pruebe 
i < rcar un ejemplo para la ordenación alfabética y recuerde que hay que com- 
parar primero el primer apellido, después el segundo y. finalmente, el nombre. 
¿Suene! 



Ficheros internos de un programa: READ. DATA. RESTORE 

A veces, necesitamos mantener cierta información fija en el 
ncr que asignarla mediante LET o introducirla mediante 1 



demasiado lento. Para esto disponemos de una sentencia que nos permite man 
tener dalos en una línea dr programa: la semencia DATA. En una línea DAT* 
podemos almacenar constantes numéricas o alían uméricas. separadas por co 
mas. La sentencia DATA no es ejecutable, es decir, cuando el ordenador la lee 
sabe dónde está, pero no tiene que hacer nada con ella hasta que no le pidamos 
en otra parte del programa, que la lea. Podemos tener lanías lincas DATA comí 
queramos, y es una buena costumbre el acumularlas al principio o al final de 
programa. 

Para leer el contenido de una línea DATA tenemos que utilizar la semencia 
READ La estructura general de la sentencia READ es: 



READ «lisia- 



Lista: es una lista de nombres de variables reales, enteras o allanuméti- 
cas, separadas por comas. El tipo de variable en la semenc.a READ 
debe de co.nc.d.r con el tipo de dato en la sentencia DATA 



10 REM EJEMPLO 

20 DATA 3, 5, 6, "HOLA" 

3p READ A.B.C.A* 

4p PRJNT A.B.C.A? 

Al ejecutar esle programa, la línea 30 leerá de la línea DATA los valores 3 
5, (i y «HOLA" y los introducirá, respectivamente, en las variables A, B, C j 
A$. Después, la línea 40 se encargara de la impresión del contenido de esta: 
variables en la pantalla Compruebe que si a la línea DATA le cambia el núme- 
ro de línea, por ejemplo, de "¿0 a IW el resultadu es el mismo. 

Como ha observado en el ejemplo. READ debe ir seguido de los nombre: 
de variable numérica o allaiiuinérica que se correspondan con el dalo que h¡ 
de leer. READ siempre lee el primer dato, del bloque de líneas DATA, que aúr 
no haya sido leído. Es decir, el ordenador lleva en su memoria un puntero qui 
le índica Cuál ea el Siguiente dato que ha de leer. Cuando nos encontramos cor 
el primer READ. se busca el primer DATA que haya y se coloca la direcciót 
del primer dato como contenido del puntero. Tras leer un dato, el contenida 
del puntero aumenta en una dirección para que así la próxima vez leamos c 
dato siguiente. Si tratamos de leer más datos de los que hay obtendremos ur 
mensaje de error. 

20 REM* NO HflV TANTOS DATOS # 

40 IiRTfl 1,2.3.4 
50 DRTfl 5,6.7.8 
60 PEflD R,B,CD 
70 PRINTfl,B.C,D 
80 m TO 60 



ireccion 
C v D. 



Cuando el control llega por primera vez a la línea 60, se busca la 
del primer DATA y se van leyendo sucesivamente los valores de A, 
Después, la línea 70 se encarga de imprimirlos y la 80 devuelve al control a la 
línea 60, que ha de leer otros cuatro datos. Ahora el puntero marca la dirección 
del 5 de la línea 50 v por ello se leerán e imprimirán los números 5, 6, 7 y 8 



ala línea 60. 
de error: 



más datos 
ERROR 



de la línea 50 Después el 
para leer v por ello 
IN 60. 

Claro que a «ees nos interesará leer cierto número de veces el mismo dalo, 
v para ello podemos utilizar el comando RESTORE. La estructura general del 
comando RESTORE es bastante sencilla 



RESTORE 



y su acción es la de hacer que la próxima dirección de lectura vuelva a ser la 
del primer DATA que tengamos: 



?A PFM* UTIL IZANDO RESTORH * 

40 DftTA t .2. 3, 4. "¡.6. 7. 8 
50 PEAP A 
6fl PPT NT fl 

70 RESTORE 
fi© r¡0 TO 50 

Con este programa siempre estaremos leyendo e imprimiento el I fie la lí- 
nea 40 pues el comando RESTORE obliga a que la próxima dirección de lectu- 
ra vuelva a ser la primera. 

La estructura general de la línea DATA es: 



DATA «lista» 



Lista es una sene de datos numéricos o alfanuméricos separados por 
comas. Los datos alfanuméricos no es necesario encerrarlos entre 
comillas. Si tratamos de leer un dato alfanuménco con un READ 
numérico obtendremos un mensaie de error. 

S. leemos medente un READ A% un dato numérico no entero se 
tomará la parte entera del número correspondiente. 



Vamos a diseñar un programa -Diccionario de Idiomas*. Su funcionamien- 
to ha de ser el siguiente: tras preguntarnos qué día de la semana deseamos {dej 
1 al 7) y en qué lenguaje lo deseamos (español, inglés, o francés), nos presentará 
en la pantalla el número del día que hemos pedido y cómo se escribe en el idio- 
ma elegido. 



20 RSm DICCIONARIO DE IDIOMAS # 
40 PPT NT "IT 

SO PPINT :PPINT TñB<l?>; "DIA DF LA SENANR" 

f& PPIMT PP[Hr:ppiNT 

70 PRÍNT M PlJL$E UN HUMERO DEl 1 AL 7" 

80 HFT flí: IF 0$="" THEN 80 

85 IF ñSCCRí)<49 OR ASCñí»55 THEN 80 

90 fl=VRL < Aí ) 

ISO PRINT 11 3" 

UO PPINT: PPINT PPINT"L0 DESEA EN" PRINT 
1?0 PPINT THB<8>; "l.FSPANOL" 
130 PPINT THBÍ8 INGLES" 
Í40 PPINT TABC8 • FRANCES" 
150 PPINT PPINT PPINT 

160 PRINT "PULSE UN NUMERO DEL 1 AL 3" 
170 GET P* TF P$="" np Pí<"l" ftP R$>"3" 

THEN 170 
180 R«Vftt í'P*) 
i?o RESTORE 

200 REr't**************t*********#*****## 

?10 REM* BUSQUEDA DF DATO * 

220 REM###******'******** ♦**'**♦*♦♦*♦♦♦'♦* 

230 POR 1 = 1 TO CRH >*7+fl 
?40 PE ATI Dí 
; ,c iO ÑÉXT I 
?60 PPINT "IT 

270 PPfNT"FI DIA". A: "SE ESCRIBE " 
?80 PPINT 
290 PPINT 

300 PPINT "DESEA BUSCAR OTRO DIA CS/N>" 

310 GET K$ : IF K*»"S N THEN 40 

320 TF K$O m N" THFN 310 

330 PRINT -PPINT THB* 15) ! "HASTA iTTPfl" 

340 END 

350 DATA I -UNES • MARTES ■ M T ERCOLES K TI IE VES . 

VIERNES • SABADO, DOMINGO 
360 DATA MONDAV, TUESDAV - WEDNESDAV/ 

THUPSHAY i FRI DAV/ SATURDAV . SUNDAV 
370 PftTA LUNDI . MflRDI ■ MERCREDI . TENDI ■ 

VENDREÜI , SflHEBI ■ DI MANCHE 

La única novedad está en cómo se utilizan las variables R y A para calci 
el valor final del bucle FOR (línea 230) que se encarga de ir leyendo los DA 
uno tras otro. Los días de la semana son siete, y, por ejemplo, si queremos I 
el cuarto día en inglés(R-2, A=4). entonces (R-l). 7+ A- 11, así leeremos o 



daros, los sirte en español y los cuatro primeros en ingles, de modo que el últi- 
mo dato que leeremos con D$ (línea 240) será «THURSDAY». Aumente su dic- 
cionario y juegue con sus amigos. Cambie este programa y almacene los datos 
en diversas variablc-s ron índices. 

Fichero» en la Datassette 

Es una pena pasarse una hora o más introduciendo datos, en algunos de 
los ejemplos anteriores, y saber que después, cuando apaguemos el Cornmodo- 
rc. se horrarán estos datos de su memoria. 

En el capítulo primero vimos cómo guardar los programas en la Datassette 
i , reai asi ficheros de programas que podemos conservar en cintas después vol- 
ver a reproducirlos directamente desde las cintas sin necesidad de teclearlos. Algo 
•imilai tendremos que hacer ron los dalos. Parece obvio. Ls muy confortable 
poder grabar los dalos, nombres, direcciones, ele, y después poder reproducir- 
los para leerlos, modificarlos o lo que queramos. 

Ksios almacenes de datos en dispositivos periféricos, cintas, disquetes, reci- 
Ixrn el nombre de ficheros de datos, y ahora vamos a aprendel cómo crearlos 
v utilizarlos con la Datassette. Kn el apéndice «Otros periféricos* se explica có- 
mo hacerlo con el dispositivo de discos. La evaluación entre si comprar una Da- 
tassette o un dispositivo de discos es mu> sencilla: la Datassette es mucho más 
barata, pero el dispositivo de discos es muellísimo más rápido. Con lo que lodo 
depende de cómo evalúe tú propia tiempo. 

Sea cual sea el dispositivo que elija, sea prec avido y trate las cintas o discos 
i on i ieria precaución. No las exponga I fílenles de calor, magnetismo o hume- 
dad y. |K»r si acaso se le olvidan las precauciones anteriores, realice c opias de 
seguridad (copie los dalos o programas en varias cintas o discos), 

r.xistcn varios tipos de fíchelo» de dalos, pero con la Dalasselte estamos li- 
mitados a utilizar un solo lipo: los fichero* de acceso secuencia!. L'n fichero de acceso 
H-tuencial tiene la caraclerísut a siguiente: 

Para acceder a un dalo hay qUC pasar primero por todos los datos que le 

preceden. 

Lai instruí (iones básicas para manejar ficheros en el (Mil son: OPEN, 
PRINTfi INPUT». GET* y CLOSE. Vamos a analizarlas una a una. 

OPEN ni. nd. ds, (% 



ni: Es el número del fichero. El numero que utilizamos para tener acceso 
a este fichero. Podemos elegir cualquier número entre 0 y 225. 

nd: Es el número del dispositivo. La Datassette es el dispositivo 1 S¡ 
trabajamos con una sola unidad de discos utilizaríamos el número 8, 
etc 

ds: Es un número que indica para qué hemos abierto el fichero. Los 
valores que puede tener dependen del dispositivo que utilicemos. En 
la Datassette son. 
0: Abrir fichero para leer. 
1: Abrir fichero para escribir. 

2: Abrir fichero para escribir y añadir una marca de fm de tabla (para 
avisamos de cuándo termina el fichero). 
fS: Nombre que le damos al fichero, en general una expresión o variable 
alfanuménca. Como máximo puede tener 16 caracteres. 



Trabajando con Datassette podemos tener abiertos simultáneamente hast; 
10 ficheros; esto es, 10 números de ficheros «nf». Pero si en una misma cint; 
abrimos un fichero y a continuación otro, rn la zona que deberíamos guarda 
para los datos del primer fichero grabamos la cabecera del segundo y despuc 
iremos mezclando los datos de uno y otro, con lo cual será muy difícil recupe 
cu los. Kl método más aconsejable es utilizar varias cintas, una por cada fichen 
que deseemos abrir. Ya le advertí que era pesada 

No es obligatorio especificar el valor de «ds». Si no ponemos nada, el orde 
narlor le asigna un vero. También podemos prescindir de indicar el nombre de 
fichero «f$». Rn este caso, si estamos leyendo, tomaremos el primer fichero qu< 
encuentre la DtttasscttC, y si estamos escribiendo, le pondremos un nombre va 
cío al fichero. 



jará hacer i 



PRINT/f ni, ..lista a escribir» 



nf: Número del fichero al que ya nos referíamos en la instrucción OPEN 
«Lista a escribir»: Dato o nombre de variable cuyo contenido se 
va a imprimir en el fichero 



Pam poder utilizar esta instrucción es necesario «pie previamente huyuiuo 
abierto (< >PEN) el fichero número »nt» No podemos dejar un espado rn blan 
10 entre el l'RIN T v#. pues obtendremos un mensn|r- de error Además, coi 
PRINT* no podemos utilizar ni TAIJ ni SPC 

Como veremos en el apéndice B. si en lugar de PRINT escribirnos un sím 
bolo de interrogación <•?•>, el ordenador lo interpreta como un PRINT. Pue 
bien, esto no es válido en el caso de PRINT*. y si lo utilizamos nos dará erroi 

Si la «lista a escribir» no termina en coma o en punto y coma, al final d 
estos datos se grabará el carácter correspi indicóte aCHRS ( 13). es decir, un ca 
rácter que representa un salto de línea. 



GLOSE, nf 



Tras operar con cada fichero es necesario cerrarlo. Si tras abrirlo (OPEN 
para escribir, no lo cerramos (CLOSE), después no podremos abrirlo para leei 
Además, cuando estamos escribiendo datos en un hchero, el ordenador no lo 
envía según los vamos introduciendo, pues sería muy lento. El C-64 va acumu 
lando en cierta parte de su memoria los datos que deseamos grabar, y cuandi 
se llena esta parte de su memoria envía todos los datos a gran velocidad haci. 
la cinta. Si no llegamos a llenar esta parte de su memoria, no envía nada, ¡ 
menos que utilicemos el comando CLOSE, entonces envía el resto de los dato 
que queden en su memoria hacia la cinta. Así que si desea tener ficheros sil 
errores tendrá que acostumbrarse a utilizar CI.OSE. 

Con todo esto ya podemos escribir nuestro primer fichero en la Ftetassciit 
Coloque una cinta en la grabadora, y cuando esté seguro One no hay nada gra 
bado en ella que sentiría perder, comience con el ejemplo siguiente: 



ú PEM * TMTPnrturr iON DE DRTOS * 

4R 0PEM1, ! ,2 H PP"É?:H" 
$9 PPÍNT".T 

r t> PPINT-TECLFE UN NOMBRE V FNJ ■=€" 
7* ppTWT"P^TMPM. '--¡I TiESFfi FINflUZflR" 
50 PftTNT M THTPOWJZCfl El STMBm 0 **" 
90 PpTtJT PPT NT PPÍHT 

\m INPUT "NOMBRE" í*** 
i ni if r*= m #" fHEN Í4Q 
120 PPINTttl -Ht 
1 & GO TO 
'aíi n MSE1 

Al ejecutar este programa, el Commodore le sacará en pantalla el JWnrtfc 
PRESS RECORD & PLAY ON TAPE. Pulse las teclas PI.AY y RECORD 
de la grabadora (a la vez) c inmediatamente la pantalla se queda en blanco mien- 
tras que el C-64 empieza a grabar en la cinta la cabecera del fichero. «I RUh- 
BA-. Tras unos segundos el ordenador le presenta el mensaje de las lineas bfrüW 
v VI puede dedicarse a introducir los nombres de sus amigos y pulsar 
,ras cada uno .le ellos Observe que cuando pulsa RETI RN la grabadora no 
se pone en funcionamiento. Sólo empezará la grabación si ha teclead.» ya mu- 
chos nombres o si escribe el símbolo # y pulsa REI URN. Con esto el control 
n^, , I., |¡„« a MU que cierra el fichero, v la pantalla voKeiá a quedai en blanco 
micmras se realiza la graliai ión. Realmente es muy lento, pero es que una gra- 
badora es. en sí misma, un dispositivo de muy Ixna velocidad. 

V ahora, lo < rea o no. va tenemos grabados los nombres di- nuestros amigos 
t -n la cinta Cómo podemos comprobarlo? Para ello tenemos (pie estudiar otra 



INPCTínf. -dato a leer. 



nf: Número del fichero del que se van a leer los datos. 

« Dato a leer»: Nombre de variable cuyo contenido se va a leer en lacinia. 



Compruébelo con el programa siguiente; 

Jft RFM ******** *♦* + *♦♦****♦ 

:n PPM ♦ | r CTUPfi F«F t'HTOS * 
? ü PEM ♦*♦♦*****♦♦♦*+*♦**** 

48 PPTHT"r3" 

^fi pp T NT "PñPR PECIIPFPRP L OS TlATf'S 
¿O PPf NT "PULSE rHHlf.lüEP TPCIH" 

rn afT pt iF pt--"" then rn 

sn fiPEN 1 . 1 • "PPllEBñ" 



90 PRTNT"T 

1rtH RRUIT"!. OS NOMBPF'-. GRHEH DO*. ■-.nN" 

1 ;.'fi ! HPl.lT» 1 -A* 

1 Í0 PRINT fíí 

140 IF STOM THEN I.'" 

150 CL05E 1 



Antes de ejecutar el programa rebobine la cinta hasta el lugar donde co- 
rncnzó la grabación del fichero. Oe todos modos el programa le da una nueva 
oportunidad de comprobar si ya tiene preparada la cima con las lincas 50-7*1 

Si iza sería mejor cambiar este mensaje jmii algo .isí como "COMPRUEBE LA 
NTA Y PUI.SE DESPUES CUALQUIER TECLA-. Cuando pulse una te- 
cla, aparecerá el mensaje PRESS PLA^ ON TAPE. Tras hacerlo, el control pa- 
sa a la línea ÍÍU cjuc comien/a la búsqueda del líchero (es un proceso bastante 
lento); en este momento la pantalla se quedará en blanco y cuan<Io vuelva a 
la normalidad Aparecerán en ella los nombres que estaban grabados rn la cinta. 
Ahora ya estamos preparados para crear ficheros con los dalos cjuc más nos inte- 
resen: nuestra colección de discos, nuestros amigr» y sus teléfonos, etc. 

En la línea 140 hemos introducido algo nuevo. 1.a línea quiere derir: «si el 
fichero no se ha terminado vuelve a la línea r¿*tV Pero esto requiere una expli- 
cación adicional de SI Esta es una variable interna del sistema que loma di- 
versos valores, según cuál ha sido el resultado de la última operación de 
entrada/salida de datos. 



Valor de ST 



I 

2 
* 

8 

16 

32 



64 
128 



Significado 



Operación correcta 
Operación correcta. 
Bloque pequeño. El bloque a leer tie- 
ne menos octetos de lo esperado. 
Bloque grande. El bloque a leer tiene 
más octetos de lo esperado. 
Error irrecuperable de lectura. 
Uno o más bits han sido leídos inco- 
rrectamente. 

Error en la comprobación de la 
suma. 

Fin de fichero 
Fin de la cinta. 



F.í. i.'* ftpjfela «toa de ST. 
Otra forma de recuperar los dalos de un fichero es mediante la instrucción : 



(¡KT#nf. «nombre de variable» 



Y al volver a realizar la operación de recuperación verá aparecer los nombres 
de sus amigos, pero una letra debajo de otra. Recuerde que GET sirve para re- 
cuperar un solo carácter cada vez. Si quiere verlo en forma correcta, debe poner 
un símbolo de punto y coma al final de la línea 130 

130 PRINT A$; 

Como ejercicio final trate de construir dos programas: uno, para crear un 
fichero con el nombre y teléfono de sus amigos, y otro, para poder consultarle; 
compare su solución con la siguiente. 

4 PEM* CARGAR AGENDA Á 

5 REM***WXX*X*X»M»**XM*X »«•*-**#***- 

10 reiOT-rPÓSlClONE LA CINTA EN El 

LUGAR DONDE " ¡PRINT 
26 PRINT "DESEE COLOCFW EL FICHERO y 

PULSE" = PRINT 
30 PPINT'Tiiftl QI.IIEP 7ECLA CUANDO LO 

HAVA HECHO" PRINT PRINT 
40 GET A$ IF A$="" THFN 40 
50 TNPUT "NUMERO MAXIMO DF TELEFONOS" i M 
60 PPINT'TMNTPODUZCfl HOMBPF V 

TELEFONO SEO' 'N SE"¡PRINT 
7fl PPINT"L09 VRVfl PIDTFNDO. PAPA 

TERMINAR PULSE" : PRINT 
«O PR I NT " UN I CAMENTE CRETURN3 CUANDO 

LE PIDA EL " :P*INT 
?0 PRINT "NOMBRE. " PRINT PRINT 
100 OPEN 1 . 1,2/ "AGENDA" 
110 PRINT#I,M 

120 Ní a "" : INPUT"N0MFPE "¿Ní 

1 30 IF Nt="" THEN 21 O 

140 INPUT"TELEFONÜ" . Tí 

I50 PRINT 

160 PPINT4H .N$ 

170 PPINT#1. 7* 

180 M = M-l 

if M>0 THEN 1?0 
?0ñ PRINT "AL CftNZADO FL MAXIMO DE TELEFONOS" 
?10 CLOSE 1 



2 reM************************** 

4 REM* CONSULTAR AGENDA * 

5 reH***»»»***********-*»**»*»** 



10 PRINT 'TFOSICI ONE Lfi CINTA EN EL 

LUGAR DONDE" : PRINT 
2Pi PRI NT "COMIENZA EL FICHERO. 

PULSE CUALQUIER" PRINT 
3© PRINT "TECLA CUANDO LO HHVfl 

HECHO. ": PRI NT: PRI NT 
40 GET fi$nF ñí="" THEN 40 
50 OREN 1.1.0. "AGENDA" 
60 INPUT#1 ,M 
70 DIM Nf'M>.T$ai> 

80 IF ST>3 THEN PRINT "SU AGENDA 

ESTA VACIA. " END 
90 I = 1+1 

100 INPUTW t N#< I> * T$<I) 
110 TF ST"0 THEN 80 
115 CLOSE 1 

120 PRI NT "!X A AGENDA VA Ef'A 

CAROADA"' PRINT 
130 PP!NT:RÍ = " " : INPUT"EL TELEFONO 

PF QUIEN ".Ai 
135 IF A*~ " " THEN END 
140 FOR H=l TO I 
150 IF N*CH>*AS THEN 190 
160 NE'XT H 

170 PRINT H NO TIENE EL TELEFONO DE 
130 GOTO 130 

190 PRINT TELEFONO DE ■ I A* • " • T** H) 



DIVISION DE TAREAS 

En general, cuando atacamos un problema, lo primero que haremos es dcv 
glosar el problema en partea y después empezar a resolver cada una por separa- 
do, siempre que sea posible. F.Í lenguaje BASIC nos proporciona dos herramientas 
para que podamos seguir este esquema de trabajo: tas funciones definidas y las 
subrutinas. 



definidas 

Estas nos permiten definir un tipo de actuación sobre una 
ta parte del programa, y después recurrir a esta definición 
Para definir una función tenemos que utilizar. 



DEF FN «n.f» <«n.v») = -expresión- 



«n.f»: Es el nombre de la función que vamos a utilizar Ha de ser un 
nombre de variable real, pero no puede tener más de cinco caracte- 
res u obtendremos un mensaje de error. 

«v.v»: Representa a la variable sobre la que se va a actuar Ha de ser una 
variable numérica 

«expresión» Son las operaciones a efectuar sobre la variable indicada 
en «n.v». 



Para utilizar la función definida con la sentencia anterior tenemos que utili- 
zar el comando: 



FN «n.f-. («n.v») 



«n.f»: Igual que en DEF FN 

«n.v»: Es la variable con la que se va a efectuar la operación indicada en 
DEF FN Su nombre no tiene por qué coincidir con el indicado en 
DEF FN. 



Tras esto habrá advertido que las posibilidades de trabajar con funciones 
definidas rn el Coinmodore son muy pobres. Sólo se permite un argumento y 
tu de ser una variable numérica. No obstante, aun podemos utilizarlas para 
resolver algunos problemas. Suponga que trabajando con números t on décima- 

deseamos crear una (unción que se quede con sólo las dos primeras cifras 
decimales. 



10 Pr.M 

: t t REM * PF DONDE 0 # 
30 PPM 

40 HFF FNC<X>"INK lWXVinPi 

m PPINT "TECLFE UN NUMERO CON DECIMRIES" 

. IHPIIT P 
70 PPINT PPINT PPINT 

PPINT"PEPONDFRNPO FSTF NUMERO MIJEDR" 

■FNC(R> 



I-a sentencia DEF FN, al igual que DATA, puede estar en cualquier lugar 
del programa, ya que cuando el ordenador llegue al comando FN localizara el 
DEF FN |>ara ver qué operaciones ha de realizar con el argumento del FN. Ob- 
serve además que el nombre del argumento del FN no tiene por qué coincidir 
con el del DEF FN. Es decir, el argumento del DEF FN es «simbólico» o «re- 
presentativo-. En el ejemplo hemos utilizado las variables R en FN y la X en 



Subrutínas 

lisia estructura de programación sí que nos permite diseñar nuestros pro- 
gramas en una forma modular que después podamos encajar fácilmente. Ade- 
más ton rila se han- factible la posibilidad de construir módulos de programa 
(por ejemplo, una rutina de ordenación de listas) que después podemos utilizar 
en di\x-i*os programas. Para estudiar sus características consideremos el siguiente 
esqueleto de programa: 

10 REM ******************** 
20 REM * GESTION DE DATOS * 
30 PEM ******************#* 

40 PPINT'TT 

Si? PPINT TAB 1 ' 12) ¡ "MENU PRINCIPAL" 

60 PRINTPRTNT"1. CREACION DE FICHERO" 

70 PPINT :PRINT" 2. INTRODUCCION DE DATOS" 

90 PRINT ; PPINT"3. ACTUALIZACION DE DATOS" 

^O PRINT : PRINT"4. SACAR LISTADOS" 

100 PRINT -PRINT "5. GRABAR FICHERO" 

110 PPINT PPINT "6. CARGAR PICHERO" 

120 PPINT PPINT PRINT 

130 PPINT" PULSE FL NUMERO DESEADO" 

140 GET A*IF A*="" THEN M« 

THEN 140 
150 IF RSC<:A*X49 OP RSCCR*»54 
160 fl=VAL CA*> PP I NT "H" 
170 IF A«l THEN BÜSUB 1000 
190 IF A«2 THEN GOSUB 2000 
190 ÍF fl»3 THEN GOSUB 30** 
200 | F A=4 THEN GOSUB 4000 
210 IF fl»5 THEN GOSUB f-000 
220 II- h~k rHEN GOSl'B 6000 
2 :¡0 00 TO 40 

1000 REM ***************************** 

1004 REM * RUTINA PAPA CPFHP FICHEROS* 
100* PFM ***************************** 

1,010 PPINT •' PRINT : PRINT 
1020 PRINT TRBC10?; 

"CREACION DE FICHEROS" 
1030 GOSUB 7000 
1040 PETIJPN 

2000 REM **♦**♦*♦♦*#♦«**********#***##* 

2004 PFM *PUTINfl PAPA INTRODUCIR DATOS* 
2006 REM #***#**##*#***#**##**#****#*## 
2010 PRINT : PPINT : PRINT 
2020 PPINT TAB<9>; 

"INTRODUCCION DE DATOS" 
2030 GOSUB 7000 



204* RETURN 

"000 REM ***************************#*.* 
3004 REM *R' IT I NA PAPA ACTUALIZAR DATOS* 
300^ PEM *******##***********#*****#*** 
3010 PPINT PPINTPPINT 
3020 PPINT TAB'9>; 

"ACTUALIZACION DE DATOS" 

3638 GOSUB 7000 

3040 RETURN 

4000 PEM *******♦♦♦*♦+♦♦**♦**♦♦***•***** 
4004 PEM ♦ RUTINA PAPA SACAR LISTADOS * 
4906 REM ♦******♦♦♦♦***♦♦•♦♦♦♦*♦*♦*♦«*♦:* 
4010 PPINT PRINT PRIN^ 
4020 PPINT TAB<9>: 

"OBTENCION DE LISTADOS" 
403O GOSUB 7000 
4040 RETURN 

5000 REM **************************** 
e -004 REM * RUTINA PAPH GRABAR DATOS * 
S006 PEM **************************** 
5010 PPINT PPINT : PRINT 
5020 PPINT TAB<11 > . 

"GRABACION DF DATOS" 

«=■.030 '"iOSUB 700.1 

e .040 RETURN 

S00O PEM **************************** 
6004 PEM * RUTINA PAPA TAPIAR HATOS * 
6006 PEM **************************** 
6010 PRINT PPINT PPINT 
6020 PPT NT TAB'?>; 

"REPRODUCCION DE HATOS" 
Kino GOSUB 7000 
S040 RETURN 

70O0 PEM ****************************** 

.'004 PEM * RUTINA PAPA VOLVER AL MENU * 

7006 REM ****************************** 

7010 PPINT PRINT PRINT 

7015 FOP 1=1 TO 1O0ONFXT I 

'0?« PRINT" DESEA VOLVER AL MENU?CS/N>" 

7036 GET R$:iF Pf="S" THEN RETURN 

7040 IF RÍO"N" THEN 7030 

7050 PRIMT-n- PPINT TAB.' 17); "ADIOS" 

7099 END 



El núeleo principal del programa está en las líneas IW-23Q Se presentan siete 
opciones y usted ha de elegir una pulsando el número correpondiente. El orde- 



uador comprueba cuál ha sido el número solicitado y le envía a la subrutina 
correspondiente: 



GOSUB «núm. de línea» 



«núm. de linea»: El número de línea en la que comienza la rutina. Si no 
coincide con algún número de linea del programa obtendrá un 
mensaje de error. 



La instrucción OOSUB viene del ingles (X) lO SUUROLT1NF. (ve a la su- 
biuiina), y cuantío el ordenador encuentra este comando envía el control de 
ejeCUCÍOn al número de línea especificado tras el comando. 

1.a eStruclunt de las subrulinus que comienzan en las línea* 1000 20UÜ UXM 
4000 MMfló 6fl00e* similar. F.n realidad se lian pueMO a modo de ejemplo, indi- 
cándole que es aquí donde tendrá que escribir sus propias Mibrutinas de crea- 
ción, actualización, grabación, etc. En los ejemplos del programa lo único que 
hacen es imprimir en pantalla lo que sería el título de la subrutina (línea 1020 
2020.....<)020) y ceder después el control a oirá subrutina: la 7000 

Antes de examinar la subrutina 7000 líjese en el comando RETURN con 
el que finalizan las subrutina» 1000-600» 



rkturn 



Devuelve el control a la linea siguiente a aquella que llamó a la subrutina. 



lisia sentencia indica que la subrutina ha finalizado y que el control vuelve 
a la línea siguiente a la que llamó a la subrutina. Pero líjese, además, que para 
realizar esta operación no es necesario indicar el número de línea iras el RE- 
TURN. es decir, el ordenador recuerda cuál fue la línea que llamó a la subruti- 
na y devuelve el control a la línea siguiente. 

EstO se enriende mejor con la subrutina 7000 |óda> las subruiinas anterio- 
res llaman a la 7000 v si nuestra respuesta a la línea 7020 es «S», el RF.TURN 
de ta línea 7030 devuelve el control a la línea RETURN de la subrutina que 
realizó la llamada y esta línea devuelve a su vez el control a la línea siguiente 
a la que le cedió el control. En forma gráfica, la estructura de control (leí pro- 
grama anterior la podemos ver en la figura 3.10. 

Por ejemplo, si A=l la línea 170 cede el control a la 1000 después \.i línea 
1030 transfiere a su vez el control a la 7000 Si nuestra respuesta a la línea 7020 
es «S>, el RF.TURN de esta línea devuelve el control a la línea ltWtt que al ser 
un RETURN cede a su vez el control a la línea 180 pues fue la línea 170 la 
que realizó la llamada a la subrutina 1000 

Otro puntíi a observar en la subrutina 7000 es que el comando RETURN 
puede estar dentro de. una línea multisentcncia y además también tras un IF. 
F.n general, puede estar situada en cualquier posición correcta de una instruc- 
ción normal. 




Fi R . J tU I**?.»,,* «V 1.. «imi-u .Ir ..mi rol. 



I.a estructura de las líneas 170 220 es tan típic a que el ( Mi4 nos proporciona 
ro comando que puede realizar la función de todas estas líneas a la vez. 



ON «expresión» GOSUB «1" núm. de linea. 2.° núm. de linea,...» 



«expresión». Tal como A o A ' 4, que el ordenador evalúa v toma la 
pane entera como resultado. Si el resultado es 1. se cede el control 
al primer número de linea que aparezca tras el GOSUB Si el 
resultado es 2. al segundo número de línea, y asi sucesivamente. Si 
hay sets números de linea tras el GOSUB. entonces «expresión» 
puede tomar valores del 1 al 6. Un valor de «expresión» tuera de este 
rango ocasionará que el control pase a la linea siguiente a la que 
contiene la sentencia ON.. GOSUB 



Pruebe a introducirlo. I>orrando las líneas 170 180 190 200 210 y 220 del 
"ograma anterior y escribiendo en su lugar. 

170 ON A (iOSUB 1000 2000 3000 4000 5Ü0Q Ü000 



En realidad, también podríamos borrar la linca 150 pues si el número que 
pulsamos excede del rango pennilido el control pasa a la línea 23£ \ ademas, 
si pulsamos una letra, la línea 100 introduce un 0 en A. 

¿Y por qué utilizar GOSUB en lugar de GO TO? Si utilizamos GO TO pa- 
ra ir a una rutina, después tendremos que finalizar la rutina con un GO 1X3 
que devuelva el control a la línea siguiente a la que llamó, y esto impediría el 
poder utilizar una subrutina desde diversas partes del programa : líjese en la 
subrutina 7000 del programa anterior;, pues cuando finalice la subrutina, 
/cómo recordaremos a qué lugar del programa tenemos que devolver el 
control? 

Con esto ya hemos dado un repaso a las estructuras más importantes de pro- 
gramación en BASIC con ii C-64. Quizá el primer ejercicio que habría que 
desarrollar es el de rellenar el esqueleto del último programa con los ejemplos 
que vimos anteriormente sobre creación de ficheros, grabación, etc., con las mo- 
dificaciones oportunas. ¿Y después? Lo mejor es acudir, ahora que va está pre- 
parado, a algún libro general de ejercicios o a un libro específico sobre el tema 
de su interés. Ks importante no dejar de practicar, pues en muchas ocasiones 
las cosas se olvidan más fácilmente que se aprenden. 



4 Gráficos y sonido 



INTRODUCCION 

El Commodore 64 ofrece grandes posiblidades en cuanto a la construcción 
de gráficos y la generación de sonido. Sin embargo, la explicación detallada de 
todas estas características va más allá de una simple introducción y precisa de 
un conocimiento más profundo del funcionamiento de nuestro ordenador. No 
obstante, con el nivel que ya tenemos si que seremos capaces de crear gráficos 
y generar sonido a un nivel que dejará asombrados a nuestros amigos y servirá 
para animar nuestros programas 



GRAFICOS 

No existen en el C-64 comandos de BASIC que se encarguen directamente 
del manejo de los gráficos. Por ello, cuando pasemos del apartado de «Control 
de la |>antalla». tendremos que introducir los comandos PKKK y POKE. que 
nos permitirán controlar el contenido de la memoria del ordenador, para poder 
imprimir, colorear y mover los gráficos que deseemos utilizar. Otra opción es 
no estudiar esta sección de urálicos y adquirir el cartucho de BASIC SIMON. 
Kste es un RASIC muy ampliado con un gran número de instrucciones que han 
aparecido en otras versiones de BASIC y en particular con palabras clave que 
nos permiten manejar los gráficos y sonido en una forma mucho más fácil que 
utilizando las instrucciones PEEK v POKK. El único inconveniente es que ocu- 
|m gran parte de la memoria del C-64. 



Control de la pantalla 

Como ya vimos en el primer capítulo, la pantalla se puede considerar for- 
mada por una cuadrícula de 25 filas (de 0 a 24) y 40 columnas {de 0 A 39). 
Kn cada una de estas [msiciones podemos colocar un carácter. 

También hemos aprendido a controlar la impresión mediante las funciones 
IAB y SPC y mediante los separadores ■«,>• y Pero hay un punto que allí 
mencionamos brevemente y que es importante repasar ahora: la introducción 
de las acciones de control dentro de los PRINT aliánumé ricos. 

Por acciones de control nos referimos a las teclas CI.R/HOME, 
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ea mediante ciertos símbolo* que puede ver en la lisia de la figura 4.2. (Para 
obtenerlo» hay que pulsar la teda, o tecla», correspondiente! dentro de las co- 
millas de un PRINT.) 



Acción 



Helas 



Símbolo 



Cursor a la esquina 
perior izquierda 



SU 



CI.R/HOMF. 



Horrado de pantalla > cunar 

la esquina superior izquierda 



SHIFTl y [CI.R MOMll 



GUl 
Cursor arriba 
Cursor a la derecha 

Cursor a la izquierda 



c:rsr T/i 



CKSK - ---I 



SMIFT 



CRSR — /— 



Q] 
1 



Fig. 4 2. Mmbulm que irprcwrnun 4 iWfWi dr «nnln.1 



f un tirulo en tnetlio de la pantalla potfernOa utilizar 



programas itiguiem 



10 PEM 

29 PFM * PRIMERA FORMA ♦ 

30 PEM $5S;if : $ ! S:$'4' fW^^f ^ 
40 PRIHTTT 

5@ PPT NT" PRINT 



60 IMPIJT "TECLEE IR PRLRBRR" ; p* 
70 IF LEN<P*»40 THEN 48 
30 PPINT'Tl" 

90 POR 1=1 TQ nPPIMTHFXT 
ion PPIHT TflBí28-tEN<P*>/2>;PÍ 
110 GO TO U9 



10 RFM 

26 REH * SEGUNDA TORMfl # 
'!0 PEM *#*4:*?f:*#******if** 

50 F$="íüi'rwsTWíriirs]Pniii']pr' 

70 RPINT A*-H_EFTf ÍB*#3> 

£0 INRI IT"TFCLFE l.fl PAL RBPA" ! P$ 

?0 IF LEN<P*»40 THEN 70 

100 PRTNT R$+LEFIJ' HT . 12*' + 

LEFT*<C* - < 26-t EN<P$V2»;P* 
1 10 GO T 0 1 1 ri 



Kn principio pairee más » (implicado el segundo programa, sin embargo, se- 
gún se vaya acostumbrando le resultará mucho más sencillo y ohscrvará las grandes 
posibilidades de gestión de la pantalla que le ofrece el empico de las an iones 
«Ir lonliol l.n ambos programas medimos la longitud tic l'S con objeto de no 
tratar de (entrar en la línea algo cuya longitud es superior a 40 caracteres, Kn 
el segundo programa se definen las variables AS, B$, y C$ como unas cadenas 
de acciones que después fragmentamos mediante LKrTS para Obtener el des- 
plazamiento deseado, F,l bucle infinito de la línea 116 CS, como siempre, para 
i*\ itar que tras la impresión aparezca el mensaje R EADY. Para salir de este bu- 
rle pulse la leda RÜN/STOP. 

L lili/. nulo las alciones de control de impresión podemos escribir primero 
en la parte inferior de la pantalla, luego en la superior, después en la parte dere- 
cha y tras esto en la izquierda. Compruébelo con el programa siguiente: 

10 PEM *4*4-ff* 

;r, pcri + pnNTfi'5. rflPPINflLES * 

4m PRINT"3"; 

Ti? pp i nt " pwsIsIPJs^l«rl'rprpInl , IW! , Ií , Wí , w''Is!«^ww ,, + 

"ftMMMMMMMMPISUR" I 

60 PP r NT " 'TTTTTTTTTTTTTTTTTTTTTTTT ' + 

70 PRI NT " stasnWWWíWMWW ! 
30 Pfí j NT" ■■■■■■■■■■■■■■■■■■■■■■■■■■■I" + 

"mmniaWESTE" 

98 00 TÓ 98 



A Mes de analizar el programa anterior debe recordar que cuando un PRI NT 
rermina sin punió y coma, el cursor que indica en qué posición de la pan i alia 
se va a imprimir la próxima vez salía a la línea siguiente. Para evitar tener que 
contabilizar este sallo colocamos un punto y coma al final de cada PRINT. En 
la línea 40 borramos la pantalla y colocamos el cursor en la posición 0. 0 (línea 
0 columna 0). Para imprimir SUR nos desplazamos 24 líneas hacia abajo y 18 
columnas hacia la derecha. Iras esto, para imprimir NORTE, subimos de nue- 
vo a la línea 0 y retrocedemos cuatro columnas, pues ÑOR I E es más largo que 
SUR y queremos colocarlo centrado. Las palabras KSTE y OESTE las vamos 
a imprimir en la línea 12. Por ello lijamos II líneas y avanzamos 14 columnas, 
pues NORTE nos dejó en la columna 22, y para imprimir OESTE tenemos que 
retroceder hasta la columna W Fíjese que, aunque el cursor de la pantalla pase, 
ei) su desplazamiento, por encima de una palabra, no la borra. 

Para un dominio más completo de la pantalla pruebe con el programa si- 
guiente: 

10 PEM 

?0 PEM * CÓNTROl DE PfiNTfll LR * 

30 PEM ****«#*«*#*#****#*##*** 

40 PRINT "¡l" 

70 c$»"iiiMimiMHmiM >, 4 

80 PRINT fi*+B$+"EN QUE LINEA"; 

W INPUT I 

\W 00SUB 1000 

110 PRINT RÍ+Fí+"EN QUE COLUMNA" • 
120 INPUT C 
130 GOSUB 1000 

14Pi PRINT fit+Rff'QUE PfiLflBRfl"; 
150 INPUT P* 
160 GOSUB 1000 

170 PPINTrl$+LEFT$(p*.! )+LEFT$(C*.C)+PÍ 

160 00 T0 SO 

189f? PPINT ft*+B*+ M 

1010 PETUPN 

Observe cómo utilizamos gg para devolver el cursor a la posición 0. 0 sin bo- 
rrar la pauialla. Tras esto podemos situar el cursor en cualquier posición me- 
diante desplazamientos hacia abajo (23 Q invertidas) y hacia la derecha (40 
símljolos ) invertidos). La subrutina HXW se utiliza para borrar los mensajes de 
los INPL T. Sin embargo, este programa no tiene detectores para evitar un ma- 
nejo indebido, así. si escribe en la línea 12. columna 38. -PEPITO-, esta pala- 
bra aparecerá partida entre las líneas 12 y 13. Introduzca instrucciones para evitar 
este tipo de resultado. 

Oirás acciones de control son las que se obtienen con la leda IXST/DEL, 

un programa que haga patente cómo pue- 
> de los PRINT. Recurramos a un ejemplo ya utilizado: 



10 REM ♦♦♦♦f******-**************** 
20 REM * IMPRIMIENDO EN PANTALLA * 
30 PEM ♦♦«♦♦♦♦♦if********#********if 

40 PRINT "n* 

■=¡0 OET A$: IF fl$="" THFN 50 
60 PRINT Aí. 
70 GO T0 50 



Al ejecutar este programa podrá ver cómo aparecen en la pantalla lodos los 
cara* teres que teclee. También puede utilizar las tedas de control C'LR/HO- 
ME, CRSR «-/-*' CRSR VI e INST/DEL. Sin embarco, como no aparece 
visible el cursor de impresión, es difícil controlar su movimiento a lo largo del 
texto que estemos escribiendo. Pruebe, tras escribir unas frases, a utilizar 
INST/I)EI. y saque conclusiones sobre el resultado. 

Dentro de las comillas del PRINT' podemos introducir también las acciones 
de RVS ON y RVS OH- y los colores. RVS ON y RVS OIT se obtienen man- 
teniendo pulsada la tecla CTRI. y pulsando la teda ( » ó la según la acción 
deseada Lfl acción de R\ S es que los caracteres afectados aparecerán con el 
< olor «le la tinta \ del |>apel invenido. RVS O IT restablece la apariencia normal 
de los caracteres. Dentro de las comillas. RVS ON aparece tomo una R inverti- 
da y RVS OFF como un símbolo de guión invertida 



Aawn 


Tedas 


Símbolo 


RVS ON 
RVS OFF 


| CT RI. 

| CTRL | 


y 0 

y0 


El 
B 



IJ H>Mn him rcpmcnun a RVS UN y a RVS OFR 



i"? PEn 

2* PEM * INVERSION FE CARACTERES. * 
30 PEM **********f***if*if********** 
40 PP I HT" 7Y' 

PPINT" SINVERTIPO" 
53 PPINT PPINT PPINT 
60 PRINT"N f 'RMflL" 
65 PRINT PRINT PPINT 
70 PPINT" 31 NVEPTIFO "; 
30 PPINT M TODRVIfl INVERTIDO" 
85 PPINT: PRINT: PRINT 
50 PP I NT " 31 NVERT I DO WORMHL " 
109 GO T0 100 

Observe, líneas Wy 64* que el electo de RVS ON sólo aleda al PRINT en 
éj que que está contenido. Cuando se termina de ejecutar la línea 50 se vuelve 
a pasar a impresión normal. Para evitar esto (ver líneas 70 v 80} hay que termi- 
nar el PRINT con un punto y coma, pues esto evita éJ retorno de carro (RE- 



TURN) que tiene lugar en otro caso. En la línea 9tí se muestra cómo dentro 
ele una línea PRINT podernos primero pasar a R\'S ON v después a RVS OFF, 
utilizando los símbolos que los representan. 

Y después de hacer todo esto dentro de un PR I NT, ¡cómo no vamos a poder 
introducir los colores! Este es el último punto que nos queda por ver para mejo- 
rar el aspecto de nuestros mensajes. Corno va vimos en el capítulo ]. los colores 
los podemos obtener pulsando la tecla CTRL y las teclas numéricas del 1 al 
8 ó la tecla C= y las teclas del 1 al 8 (ver Fig. 4.4). 

Cuando, dentro de unas comillas, pulsamos las teclas para obtener un color 
aparecerá un símbolo que representa el color deseado. Después, cuando se eje- 
cute el PRINT, su contenido aparecerá en el color indicado. 



Color 


Teclas 


Símbolo 






y LU 




NEGRO 




CTRL 


□ 








BLANCO 


| CTRL 


1 y0 


El 


ROJO OSCURO 


| CTRL 




[£ 








AZUL VERDOSO 


| CTRL 


t® 


C5 


PURPURA 


| CTRL 


v0 


SU 


VERDE OSCURO 


|CTRL| 


y 00 


ai 


AZUL OSCURO 






Ir El 




AMARILLO 


[ CTRL | 






NARANJA 




m 
y LU 


ta 


MARRON 


|c-| 




I o 


ROJO CLARO 


led 


yS 


B3 


CRIS OSCURO 




y L71 


O 


GRIS INTERMEDIO 


|c=| 


>m 


m 


VERDE CLARO 


Isd 




a 


AZUL CLARO 


|c-| 


y[H 


m 


GRIS CLARO 


123 




m 



P%, 4 4 Mr.!'.-...- que trprrvniji. * |,« colorí 



19 REM *********** 

20 REM * COLORES * 
30 REM :****« 
40 PRINT "IT 



50 PRINT "■NEGRO" 

60 PPINT M «tLflNCO" 

70 PRINT"íaR0JO OSCURO" 

SO PPINT"fc 1 RZUL VERDOSO" 

90 PPINT"SfPUPPlJPfl" 

10n PPINT"fif,''ERriE OSCURO" 

110 F'PINT"3SZUL OSCURO" 

120 PPlNT^riftPILLO" 

130 PRINT";HRRflN,Tfl" 
140 PPINT"IT1flPPüN" 

150 PPlNT"¡5Pnrn CLORO" 

1*0 PRINT"1TÍPIS OSCURO" 
170 PPIMT"¡KRI3 INTERMEDIO" 
130 PPINT"t'\'ERDE CLARO" 
199 PPTNT"r»2l.lL CLAPO" 
?W PRIMT"B3RIS CLAPO" 

Al ejecutar este programa verá que el resultado de las líneas 71\ 140 y 150 
• ininteligible. Esto se debe a la tonalidad del fondo sobre el que escribimos 
(AZUL OSCURO), y sólo es necesario cambiar el color del fondo (cosa que 
aprenderemos muy pronto). La línea 110 escribe en el mismo color (AZUL OS- 
(-LRO)que el color del fondo, y por ello es imposible ver nada. Hemos escrito 
en tinta del mismo color que el papel (imagínese escribiendo con tinta negra 
sobre el papel negro, o con tinta blanca sobre el pape! blanco). Observe, final- 
mente, que tras finalizar la ejecución del programa, el color del cursor queda 
determinado jk>i el último color que le hemos asignado, en este caso gris claro. 
Lsto no pasaba con RVS ON. El efecto de RVS ON finaliza al terminar un 
PRINT que no acabe en punto y coma. El efecto dr una asignación de color 
permanece basta que realicemos otra asignación de color Compruébelo eje- 
■ mando: 

10 REM ************************* 

20 rem * efecto de los colores * 
:<0 pem »***»**¡ 

40 PRINT'TJ" 
^0 PRINT"«ST0 ES ROTO CLARO" 
60 PRINT PRrNT"V ESTO" 
T0 PRINT PPINT"V E*5T0. " 
o0 PRINT PPINT"iESTG ES VERDE CLAPn" 
90 PRINT: PRINT"V ESTO" 
100 PP!NT:PPINT"Y É'5T0" 

^ ííjese en que. tras la ejecución, el cursor queda de color verde claro. Si desea 
devolver al cursor su color normal, pulse directamente las teclas C= y 7. 

Caracteres gráficos 




Además de poder teclear letras y números y de introducir la modalidad RVS 
° los cobres, vemos que en la falda de las teclas aparecen una serie de ca- 



raelerta gráficos: rayas de diverso grosor y en diversa situación, los símbolos de 
la baraja, c írculos, ruarlos de círculo, etc. Los gráficos situados a la derecha se 
obtienen pulsando la tecla SHIFt y la tecla deseada, y los situados alais 
da, utilizando la leda Commodore (C=). (Puede verse una explicacic 
tallada en la sección sobre el teclado del primer capítulo.) 

Estos caracteres gráficos los podemos introducir dentro de las cornilla\ de 
un PRINT para adornar la presentación de los resultados de cualquiera de nues- 
tros piogramaso para construir, con varios de ellos, una figura o un dibujo que 
desceñios presentar. En el programa siguiente se utiliza un conjunto de lincas 
PRINT p¿iia presen lar en la pantalla el dihujo de una casa. Como siempre, uti- 
' un burle infinito 240 GO TO 240 para evitar que el mensaje 

i.i t)i t v ^i v m t iU" ion 



1M PF'l'l 

?Pi REM * COMSTPUVFMPO CON CHRflCTERES ♦ 

550 Fc£M 

ACf PPTMT^T 

56 PP I NT : PP I NT : PP I NT : PR I NT PPTNT 

im print" 

Ufe PPINT" - -J I ~" 

|?0 PPINT" /*• 1 I 

15M PRINT 11 ✓ \ ~ 
14"' PRINT** 

1*50 PPT NT" / K 

160 PPT NT" l I l " 

1 7íi Pf?lNT'' I i 1 " 

\m PRINT" I I 1 I i lll I • 

198 PRINT" I I I i I l ' I I " 

2m PRINT" i i i " i l ti ' " 

210 PPINT I M l i ' - 

220 PRINT" l l " I _J I " 

238 PPT NT" " 

240 00 ff) 240 

La realización de un <libuji> de este Upo es laboriosa, y es aconsejable pensar 
primero el diseño, lejos del Conitnodorc. y una vez decidido. Volver a la mesa 
de trabajo para introducirlo mediante el teclado A>í que lome un lápiz, una 
goma y una cuadrícula de la pantalla, tal como la de la figura 4.1. y comience 
a (razar el dibujo que desee obtener. Recuerde la diversidad de caracteres gráfi- 
cos que puede utilizar y tenga en cuenta que. aunque un carácter gráfico ocupe 
muy poco del espacio de un carácter, por ejemplo, . sobre eMa misma po- 

sición del carácter no podrá colocar otro gráfico, por ejemplo \^\ Esto es, 
a la hora de realizar su bocvtQ coloque un solo carácter gráfico sobre cada posi- 
ble písición del cursor. 

Con la figura terminada sobre el |>apcl. pase al teclado y comience a intro- 
ducir el programa. La forma en que m- ruck hacer es: l) Mediante las teclas 
CRSR T/i y CRSR —/-* se va desplazando el cursor hasta la posición adecua- 
da y se pulsa el carácter corrcspondicmc. 2) Una vez construida la figura, colo- 
camos el cursor en el margen izquierdo y adramos los números de línea v los 
"PRINT " en cada línea de la figura. 



Este méiodo de construir figuras es muy laborioso, pero, una vez realizado, 
podemos guardar nuestras figuras en diversas subrutinas y luego utilizarlas en 
programa, por ejemplo, programas educativos, en las que se mezclan figuras 
con leiras y con otras figuras más sencillas construidas mediante métodos que 
vamos a explicar en la sección siguimie, para obtener el electo deseado. 



Gráficos en movimiento 

Como veremos, hay diversas formas de generar movimiento tle los gráficos 
en la |»anialla, entre cÚas, con el conocimiento que ya leñemos, podemos ins- 
irumeniar la más rudimentaria. 

Considere que deseamos mover una pelóla por la panialla. Kl carácter gráfi- 
co que representa la jn-loia lo obtenemos pulsando las teclas SHIFT y Q. Así 
que coloramos la -pelóla» en una posición de la pantalla y al tora deseamos mo- 
verla. Para hai er el efecto de molimiento hay un método muy sencillo. Tras reali- 
zar la acción que indique que la pelota ha de moverse; lo primero que hay que 
hacer es borrar la pelota de su antigua posición, calcular cuál es la nueva posi- 
ción y después imprimir de nuevo la pelota en este último lugar. 

Y ¿qué es eso de realizar la acción que indique que la pelota lia de moverse? 
En el ejemplo que se expone a continuación se ha resuello de una forma muy 
sencilla. Si se pulsa un 1, la pelota se mueve hacia la izquierda, con un 2 se 
mueve hacia arriba, con un 3 hacia abajo y con el 4 hacia la derecha. Además, 
la línea 170 se encarga de que. si se pulsa cualquier otra tecla, el ordenador no 
haga ni caso. 

Para calcular la posición en la que hemos de imprimir, lo primen) que hace- 
mos es introducir en la variable A$ la acción HOME ( (§] ), en la variable 
Bf 24 desplazamientos liana abajo. CRSRI< ggg) ). Y en C$ 39 desplazamien- 
tos hacia la derecha. CRSR-( \"J] ). La primera posición en la que vamos a 
imprimir la obtenemos al azar en las líneas 110 y 120 (observe que B variará 
de 0 a 24 y que C variará de 0 a 39), y en la línea 130 introducimos el número 
le desplazamientos adecuado. La acción HOM E ( ) coloca el cursor en la 
posición 0. 0 lila 0 columna 0 Después I.EFTS B$. II provoca B desplaza- 
mientos hacia abajo y LEFT$ (C$, C) introduce C desplazamientos hacia la 
derecha. La línea 130 se encarga de imprimir la «pelóla- en la posición inicial, 
y después la línea 170 espera hasta que pulsemos la Icela descada: 1, 2, 3 o 4. 
Según el número que pulsemos, la línea ¿00 enviará el control a una subrutina 
en la que se calculará la nueva posición de la pelota (antes de esto, en la linca 
190 se ha borrado la pelóla de su Dosición anterior). Así. si pulsamos el 1, «iz- 
quierda», la subrutina 1000 hace C-C— 1. una columna menos, y después de- 
vuelve el control a la línea 210 que a su vea lo envía a la línea 130 para imprimir 
la -pelota- en su nueva posición. Fíjese cómo cu la linca 1030 se comprueba 
Itinbíén si el valor de la columna, C, ha pasado a ser negativo tras restarle L 
Esto indica que la -pelota- ha salido por el margen izquierdo, y por ello la ac- 
ción C = 39 hace que vuelva a aparecer por el margen derecho. 

i? peu ♦*♦****#*#***# 

29 PEM * MOVIMIENTO * 
REM ♦*♦##*♦♦*♦**** 
40 PRINT*'.T' 



60 B* = " M TO CT i^ ^ 

76 c*= '• mmmmmmnv + 

IHIIHHIININMMI 

80 REM ***!****************•* 
90 REM * POSICION INICIAL * 
160 REM******************** 

119 B«INT<RND<1>*25) 

120 £*IWT<RNDCÍ>*40) 

130 PRIHT flí+LEET$''Bí > B^+LFFTí "TCí . C) ; 
140 REM *****#***************#**** 
150 REM * CONTROL DEL MOVIMIENTO * 
160 REM 

170 GET M* IF HJO'T'fiNri M$0"2"flND 

MÍO":-! "HMD m<>"4" THEN 170 
180 M=VHL(M-$> 

199 PRINT fl$+LEFT$CB$iB)+LEFT$(C$*C)i 11 "> 

200 OH M GOSUB 1000-2000/3000.4000 
210 GOTO 130 

1000 REM ************* 

1010 REM * IZQUIERDA * 

1020 REM ************* 

1030 C=C-J:IF 1X0 THEN C=3? 

1040 RETUPN 

2000 REM ********** 

2010 REM * ARRIBA * 

2020 REM ********** 

2030 B-B-i-IF F<0 THEN B=24 

2040 RfcTTURN 

3000 REM ********* 

3010 REM * ABAJO * 

3020 REM ********* 

3030 B*B+ÍílF B>24 THEN B=0 

3040 ftETURN 

4000 REM *********** 

4010 REM * DERECHA * 

4020 REM *********** 

4030 C«d+1 • IF C>39 THEN C=0 

4040 RETUPN 



El punto y cuma que aparece tras las líneas 130 y 190 evita el efecto de retor- 
no de carro q^ue tiene lugar tras realizar un PRINT, pues si no, cuando despla- 
zamos el carácter hacia abajo y llegamos a la línea 24 se duplicará la -pelota» 
por el efecto de desplazamiento hacia arriba de la pantalla. Sin embargo, es más 
complicado evitar que esto ocurra cuando el carácter llega a la posición 24, 39, 
pues al imprimir aquí y desplazarse la pantalla obtendremos más de una -pelo- 
ta». Pruebe a modificar el programa para evitar este efecto. 



Manejo de gráficos en la memoria 



F.l contenido que nos presenta el Commodore en la pantalla está guardado 
dentro de la memoria del ordenador. Así, en las direcciones de memoria 1024-2023 
( 1 000 posiciones = 25 filas x 40 columnas) se almacenan los caracteres que en 
cada momento nos presenta en la pantalla, y en las direcciones 55296-56295 
1 1 000 posiciones) esta el color en que nos presenta cada carácter. Luego, si pu- 
dramos acceder a estas direcciones de memoria y colocar directamente en ellas 
:onienido que queramos, esto tendrá que reflejarse en la pantalla. Pero ¿có- 
mo podemos acceder a una dirección de memoria y cambiar su contenido? Te- 
nemos que aprender un nuevo comando: PÜKE 

POKE d, c 



d: Es la dirección de memoria a la que queramos acceder, 
c. Es el valor cjuc deseamos colocar en d. 



El valor de c puede variar desde 0 a 255 y se refiere a un número 
de un carácter (ver el apéndice de códigos). Así, PÜKE 1024 , 65 indica que co- 
locamos el carácter (cuyo código es el 65) en la esquina superior izquierda de 
la pantalla, pues su dirección de memoria es la 1024. Sin cml>argo, en general, 
aunque coloquemos un símbolo en la posición 1024, no conseguiremos verlo, 
a menos que asignemos algún color en la dirección de colores de |>antalla co- 
rrespondiente, en este caso la 55296. Así, el comando directo; 

POKE 1024, 65: POKE 55296. 10 

hace aparecer un símbolo de PICK, rojo claro, en la esquina superior izquierda 
de la pantalla. En las figuras 4.5 y 4.6 puede ver las direcciones de memoria 
que se ocupan de guardar el contenido de cada posición de pantalla y su color. 
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l'.tra calcular la dirección, sume el número de ■ i!.n. al nítmem imii.il de la tila. 

Fie 4 > Direcciones de memoria del cometido de la* posiciones de paniall.i 
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Plg¡ í.i. amáum * wüuwíi rirt «4.» * u. p.nK...- * nmnft 



Aquí ri¡M encontramos ron dos problemas: 

1) Que números podemos colocar en la pantalla de caracteres, y 

2) qué números podemos colocar en la pantalla de colores. 

Pora utilizar la pantalla de caracteres hay que observar que los códigos que 
representan los caracteres en estas direcciones de memoria difieren de los códi- 
gos que estamos acostumbrados a utilizar. Estos códigos reciben el nombre de 
.•códigos fie pantalla- y se recogen en la segunda parle del apéndice Códigos 

Asen. 

Bu cuanto a los colores, el número que podemos colocar en estas direccio- 
nes oscila del 4M5 y su significado se expone en la lista siguiente: 



C6dy> 




Céd* 




0 


Ncgn 


8 


Nanuip 


1 


■hoco 


■* 


Marrón 


2 




II 


Rojo <Uru 


í 


-\/ni MnfcMo 


II 


(iris <l*ru 


4 


Púrpura 


12 


Un» inirmtnliu 


3 


Vn* 


13 


Verde clan» 


¿ 


Azul 


14 


Aaul ilaio 


7 


Amarillo 


15 





r'i< 4.7 Códigos para la nanulla dr culorr* 



Así, con el programa siguiente obtendrá una pantalla llena de símbolos y 
colorido. 




BUL» 



10 REM ^******««*****E##***:#* 

28 PEM * PflNTflLLR PSICOBELICfl * 
30 REM m 
40 PRINT"3" 
58 FOP 1=1024 T0 
60 POKE LVX 

70 X-X+l-'IF K=256 THEN X=0 
P0 POKE 1*34272, V 
90 V=V+l:IF V=16 THFN V-B 
100 HEXT 
lie 00 T0 110 



La línea 50 se encarga tie recorrer toda la pantalla de caracteres (de 1024 
a 2023) y la línea 60 va colocando en cada posición un valor X. De que el rango 
de X varíe de 0 a 255 se ocupa la línea 70 Paralelamente, en la línea 80 vamos 
asignando un color (Y varía de 0 a 15) a cada posición de la pantalla de colores, 
lo cual nos permite visualizar los caracteres que va colocando la línea 60 Obser- 
ve que la distancia entre la primera dirección de la pantalla de caracteres 1024 

65 POKE 53280 , 2: POKE 53281, 1 
85 POKE 53280 , 1: POKE 53281. 2 

Ahora verá parpadear la pantalla, tanto el borde como el color de fondo, pa- 
mos las líneas: 

75 POR K-l TO 500: NEXT 
95FOR K-I IO 500: NEXT 

V veremos cómo alternativamente los colores de rundo y borde van pasando de 
*ojo y blanco a blanco y rojo. ¿Qué es esto de colores de borde y fondo? Fíjese 
•n la figura 4.8. 

La imagen que nos presenta el televisor está dividida en dos zonas: el borde 
y el fonda Al conectar el C-64, el color del borde es azul claro y el color de 
fondo es azul oscura El fondo es el papel donde escribimos, y, en general, escri- 
bimos en tinta de color azul claro sobre el papel de color azul oscuro. Ya hemos 
visto diversas formas de cambiar el color de la tinta de los caracteres, y ahora, 
cabiendo cómo variar los colores del papel y del borde, podemos conseguir vis- 
tosas presentaciones multicolores. 

El color asignado al bordé está guardado en la dirección de memoria 53280 

Y el del fondo, en la dirección 53281. Para comprobarlo, pulse con determina- 
ron y a la vez las teclas RUN/STOP 
a su situación inicial, e introduzca el 




POKE 53280 , 2: POKE 53281, 5 



Borde 



Fig. 4.8 



en U 



Y además de oblener un borde de color rojo y un fondo de color verde, se en- 
contrará con que no puede leer nada. Tenemos que cambiar el color de la tima. 
Si elegimos para la tinta r] color negro, basta con pulsar a la vrz las teclas CTRL 
y I y el cursor pasará at color negro. Así puede ir probando diversos colores 
de tinta y de papel basta encontrar aquella combinación que más le satisfaga. 
SÍ en algún momento la mezcla de colores impide que pueda leer lo que está 
escribiendo, pulse las teclas RUN/STOP y RESTORE, y la presentación volve- 
rá a los colores originales. 

Los colores que podemos introducir en las direcciones 53280 y53281 (borde 
y fondo) son los mismos que los de la pantalla de colores. Esto <. 
que se pueden colocar van del 0 al 15. y el color ■ 
antes en la figura 4.7. 



Número» binarlos 

Antes de seguir introduciéndonos en este mundo de gráficos y sonido, va- 
mos a hacer una pequeña revisión sobre cómo almacena el ordenador la infor- 
mación. Siempre hemos dicho que en el C-64 podemos colocar números de # 
al 255 en las direcciones de memoria para obtener cierto color o cierto gráfica 



Cuidado con dedicarse a colocar números indiscriminada mente en cual- 
quier dirección de memoria, pues algunas de éstas las utiliza el ordena- 
dor para su funcionamiento, y si cambiamos su contenido podemos 
encontrarnos con que el ordenador se queda como «en trance», sin 
ponder a ningún comanda Para salir de este estado pulse con 
las teclas RUN/STOP y RESTORE. El único problema es que puede ha- 
ber perdido el programa en que estuviera trabajando. 



La estructura de estas direcciones de memoria es análoga a un conjunto de 
ocho celdillas en cada una de las cuales podemos colocar un 0 o un 1. La casilla 
más a la derecha es la casilla ft y la numeración avanza hasta la situada más 

Valor - 128 64 32 16 8 4 2 1 

? t t T T T T T 

pos¡c¡ón^ 1 (?) 1 (6) 1 (i) 1 (i) 1 o) 1 m 1 w 1 m 1 

Fig. 9 R« ruerno de un byle 



a la izquierda, que es la casilla 7. Como hemos dicho, en cada casilla podemos 
rolocar un 0 o un 1. Digamos que un 0 colocado en una casilla no indica nada. 
Sin embargo, un 1, colocado en la casilla 0 indica un valor de 1, colocado en 
la casilla 1 Índica un valor de 2, colocado en la casilla 2 indica un 4, colocado 
en la 3 indica un 8, y así va incrementando (en múltiplos de 2) hasta llegar a 
un 1 colocado en la casilla 7, que indica un valor de 128 (ver la línea «valor- 
de la Fig. 4.9). 
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Fig. * 10 Rrla.ioii M el número de canil* y el valor que repreienia 



Fl número total almacenado en las ocho casillas es el resultado de sumar 
el valor de las casillas ocupadas con un 1. Así: 

VaW - 128 64 32 16 8 ♦ 2 1 
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Fig. 4 U. VW« ejemplo, de la relación entre números binarios y el rouliado decimal. 



Kn la ligura 4.11 se exponen algunos ejemplos del número decimal que 
corresponde a ciertos números binarios. Los dos últimos ejemplos nos indican el 
número más pequeño, el 0, y el número más grande, el 255, que podemos 
representar con un número binario de ocho casillas. 



Cada una de las casillas recibe el nombre de bit (que puede valer 0 ó 1 ) 
El conjunto de ocho casillas se llama byte u octeto y puede representar 
números del 9 al 255 Es decir, con un octeto podemos distinguir 256 
números distintos, y esto es lo que se utiliza para almacenar y distinguir 
los caracteres (ver el apéndice de códigos ASCII) Sin embargo, 
cuando nos hablan de la memoria de un ordenador nos suelen hablar 
de K-bytes: por ejemplo, nos dicen: «tiene 16 Ka. Un K-byte es igual a 
1024 bytes Asi si queremos saber cuántos bytes nene cierto ordenador, 
haremos, por ejemplo, s. son 16 K. el número de bytes es igual a 
16.1024 16384 bytes. 



Después de esta breve exposic ión teórica vamos a entretenernos un poco cu- 
rioseando en la memoria del C-64. ¿Cómo podemos leer el contenido de una 
dirección de memoria? 



PEF.K (d) 



d: Dirección de memoria cuyo contenido queremos leor. 



La instrucción PEEK tiene acceso a la dirección de memoria d > lee el 
número allí almacenado. Pulse las tecla* Rl'N/STOP y RESTORE, para 
poner el C-64 en su situación original, c introduzca el comando: 

PRINT PEEK (53280). PEEK (53281) 

Tras pulsar RUN/STOP y RESTORE, los colores de borde y de fondo son. res- 
pectivamente, azul claro y azul oscuro. Por ello, al decirle con el comando ante- 
rior que lea el contenido de las direcciones 53280 y 53281 y las imprima en pantalla 
esperaríamos ver los números 14 y 6 (fíjese en la Fig.4.7), y sin embargo el Com- 
modorc nos obsequia con los números 254 y 246. ¿Cómo es esto? Los números 
decimales 254 y 246 se corresponden, respectivamente, con los números binarios. 

F «Minen H tutor 
■ 1 ■ I 1 l»l -2M 
8 * 4 4 2 - M 
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Fi K . 4.12. P»« definir ri «I* se ,oman tólo lo. tuauo digno, de U drrecha. 



Fíjese que en ambos casos las cuatro casillas de la izquierda están todas con 
un L Sin embargo, para definir el color el C-64 considera sólo las cuatro casillas 
de la derecha (1*2 + 4+8 = 15) y por cDo los números de los colores varían del 0 
al 15. Usted puede poner números mayores que 15, mas para calcular el color co- 
rrespondente .fe se considerará si los cuatro bits de la derecha contienen ceros 



o unos 



Antes hemos mencionado que la «pantalla de caracteres» está almacenada en 
las direcciones 1024-2023 y que la -pantalla de colores» ocupa las 



.i5¿<#h-5b295. Pues bien, aunque la «pantalla de colores» siempre permanece en 
estas direcciones, la posición de la -pantalla de caracteres» podemos calcularla con 
la formula: 

PRINT 256*PEEK (648) 

Al introducir este comando aparecerá, gene raimen le, el número 1024. La di- 
rección de memoria 648 es donde se guarda un número que determina en QU¿ 
lugar de la memoria mmienza la memoria de pantalla de caracteres. En este caso 

PRINT PEEK (648) 

el número almacenado en 648 es el 4, y así 256-4-1024. Esto sirve para alma- 
« enar diversas pantallas de caracteres en distinta* posiciones de memoria y des- 
pués, introduciendo un número u otro en la dirección 648, conseguimos que 
el ordenador nos presente en el monitor (o televisión) una u otra de las panta- 
llas almacenadas en memoria. Así, mientras que estamos observando una pan- 
talla podemos estar diseñando otra dentro del ordenador y visualizarla después. 

A continuación le exponemos un programa que visualiza una pelóla rebo- 
lando deniio de una cam ha Hemos tolotado la posii ion inic ial de la pantalla 
de caracteres. 1024. en la variable CA ílínea 60; y la distancia entre la pantalla 
de caracteres y la pantalla de colores (55296-1024 - 54272) en la variable DI. El 
resto del programa intenta explicarse mediante los REM utilizados. En las lí- 
neas 260 y 270 se definen las variables XI e Yl como el incremento en la posi- 
ción horizontal y vertical de la pelota, Si la pelota choca contra los bordes, las 
líneas 1030 v 1040 se encargan de cambiar la dirección del movimiento. Para 
borrar la pelota de la posición anterior, ames de volver a imprimirla, en la línea 
340 se coloca un espacio en blanco (cuyo código es el 32) en el lugar rn que 
antes se imprimió la pelota. ¡Anímese! v pruebe a poner unas raquetas para 
poder jugar una partida con los amigos. 



1P1 PPM 

20 RFM ♦ JUEGO Lf< PELOTA É 

48 PfclNT-rr 
-.i? DI-54272 

99 POKE 53281, * 

100 REM 

lia REM * TPftZfirin rrFf CONTORNO * 
120 PPM #****♦ ****** «*#* ******** 



1 :n h.iR 1= Ch TU i.:R+ :¡? 

1 4 ti t-'ÜK F I. POKE r +48*¡?4 . 1 

1 59 POKE I +H I . ? ' PHKF I+ni +40*V4 « ! 

160 NEXT I 

1?@ POR T-Cfl+40 TO CR+40*23 STEP 40 

1-80 priKE T. 10?: POKE T + 39. 102 

198 pnk'E I+ni . 2 POK E I+DI+39/2 

200 MEXT I 

¿18 PEM * ****#.***#***♦♦♦♦♦♦**********♦ 

228 PEM * POSICION INICIAL ALEflTOP ! H * 

230 PEM +*M*W*M*m+++ ************* 

240 K=1NT<PNP< 1 »#38>+J 

250 V=>iNt(RNlj< i>s|f23 « + 1 

26@ >a=i 

270 VI* 1 

280 POKE Cfí+ni-f40*V+X.7: 

POKE CB*40*V+K/8l 
300 REM 

310 PEM * MOVIMIENTO * 
32© PEM **###*##***♦*# 

330 ROSUB1000 

340 POKE Cfl+40*V*X,32 

X=X+X1 :V»V+V1 
360 00 TO 280 

1009 PEM #*#***♦♦ 

1010 PEM * PUTINfl DE MOVIMIENTO * 
1020 PEM ###i#*##*##*#*##*<I#**#**!# 
1030 IF X=l OR X«38 THEN X1=-X1 
1040 IF V-l OR V=23 THEN V1=-V1 
1850 RETURN 



GENERACION Y CONTROL OE SPRITES 



Además de poder utilizar los caracteres gráficos que se ven en el teclado, el 
C*64. nos permite diversas formas de crear nuestros propios caracteres gráficos. 
Esto es, definimos la forma de un gráfico (que bien puede ser un caballo de ca- 
rreras o un invasor galáctico) y después lo podemos imprimir en la pantalla y 
moverlo y hacerlo chocar contra otros gráficos, etc. Eero, antes de entusiasmar- 
nos, tenemos que hablar de la pantalla de alia resolución. Hasta ahora hemos ul '"l 
zado la pantalla de baja resolución que contenía 43 posiciones horizontales (de • 
a 39) y 25 posiciones verticales (0 a 24). En realidad, cada una de estas posicio- 
nes está lormada por ocho puntos verticales y ocho puntos horizontales. 1 
ejemplo, la letra Aest' 




Fíg. JIV Pmuu» que ínrman el ai*CMr A. 

Es decir, cada posición de carácter, en baja resolución, eslá constituida JX'r 
tí x 8-64 punios. Cuando hablamos de alta resolución nos referimos a cada uno 
de est«»s punios individualmente, y por ello, la pantalla de alia resolución está 
lormada por 320 puntos horizontales (40XÍÍ-320) y por 200 pumos verticales 

Definición de SPRITES 

l'ar.i definir un Spriie. lo primero que tenemos que hacer es coger un lápiz, 
una goma (o mejor una gran goma) y una cuadrícula como la de la figura 4.14. 



2 
i 
4 



6 

7 

a 

9 
M 
II 
l'¿ 
13 
14 
15 
16 
17 
18 
19 
2<t 
21 



rig * H Cuadrituhi lun el planteamiento de un Sume. 




Como puede Ver en la lisura, la definición de un Sprite involuci 24 líneas 
verticales por 21 lincas horizontales. Observe que los 24 punios ele una línea 
horizontal están agrupados (líneas más gruesas) en tres conjuntos de ocho punios. 

Ks decir, para dellnir cada línea horizontal (24 puntos) tenemos que utilizar 
tres octetos (8x.'i = 24>. Así. la línea ') de la figura 4.18 tiene la forma; 
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Fi( * Ti Obirnción de |r» númrrft* < t ur ri>(iir»rnljii »inj lí;.. 



I .os punios ocupador le interpretan como un I en esa posición, y los puntúa 
desocupados, como un fl 

Pues bien, comencemos a dibujar nuestro Sprite. Tentemos la cuadrícula, 
el lápiz y la goma y a rellenar y borrar puntos hasta que obténgame* un dibujo 
une [tos satislac;a. Después una vez terminado el diseño, consideraremos cada 
línea horizontal por separado e iremos calculando los tres números que le co- 
rrctponden véame l-'igs 4 1 j y 4 18 Al final tendremos 63 números :2I lilas x 
!( tVÁ . Y ahora, ¿que hacemos con estos 63 números' 

En el C-64 podemos almacenar hasta tres configuraciones distintas de Sprí- 
lc». Estas configuraciones se almacenan en las posiciones- 

Q] 832-893 
[T| 8%-959 
[Tj '.Hi0-H>24 



l'ifj 4.Hi. I)irti< «irii ■» (fundí w .iIiii-m mmii !•*< Sptin v 



Para rada Sprile se di^nme de 6 1 direcciones de memoria, aunque en reali- 
dad utilizamos sólo 63. 

Pero si bien sólo podemos ilefinir tres formas distintas, podemos utilizar hasta 
ocho Sprites al mismo tiempo en la pantalla, claro que varios de ellos it-ndran 
que tener la misma forma. Además, rada uno de estos Spnles ha de tener una 
prioridad. Esto quiere decir que si un Sprite tiene más prioridad que otro, al 
eiu/arse ambos en la pantalla parecerá que el primero pasa por encima del se- 
gundo, l-as prioridades van del tA al 7; el 0 tiene la máxima prioridad, y el 7, 
la mínima, rara indicar la prioridad de un Sprite utilizaremos una dirección 
distinta para indicar a qué nivel dr prioridad no* referimos. 

Los mí meros que podemos colocar en estas direcciones (2(Mfr2W7) son o 
bien el 13, el 14 ó el 15. El l.'i. para referirnos que el Sprite está almacenado 
en las direcciones 832-89"); el 14. para indicar que el Sprite está almacenado en 
las direcciones 896-959, y el 15. para indicar que está en las posiciones 960-IW4. 
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Vamos a n des.ii rollando un cjci 
FJ Sprite que queremos dibujar ap¡ 



pk> que nos sirva para asimilar lodo esio. 
:■< r en la fiuura 1.18. 




| .1 0 
\\ Ü 210 

13. 233. 240 
31. 233. 248 
4Ü. 126. 12 
48. 126. 12 
63. S9(, 

127, 231, 234 

96, 231, tí 

97. 231. 134 
67, 165. IÍM 
7. 36, 224 

14. 3b. 112 
¿H. IR, 56 
56. 195. 28 
120 129. 30 
120 129. 30 
120 225. 30 
120, 60 30 
120 fl 30 
120 0 30 



K-ilácTicn í" pannr» ro»« retí 



I ras calcular los números que aparecen en el margen derecho de la figura 
los colocamos ordenadamente en unas líneas DATA, por ejemplo: 

10000 rem *mmm*ww********#* 

i**!n PFM * FIGURA BEL INVASOR 4 
im&a PEM *#**#***♦♦♦♦♦*♦**♦**** 
18838 DflTfl 0. n- H 
1**40 PrtTfi 15. 0.¿4h 
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Después, cargamos estos dalos en una de las áreas de memoria dedicada 
a ello. Elijamos, por ejemplo, la 8:12-81*5 y tecleemos la linca: 

50 FOR S - 0 TO 62; RF.AD D; POKE 832 ♦ S. D. NEXT S 

Según el nivel de prioridad que le queramos dar a nuestro SPRITF.. clcgi- 
rnpi una de las |Mtsicioncs 2tH0-2<M7 y colocamos en ella el número que indica 
dónde está almacenado. Recuerde que este número puede ser: 

a) 13 si esta almacenado en 832-895 (13 x 64 - 832). 

b) 14 si está almacenado en 896-959 (14 x 64 - 896). 

c) 15 si esta almacenado en 960-1023 (15 x 64 - 960). 

En nuestro caso elegimos el nivel de prioridad 0 (20*0). y como lo hemoí 
guardado en 832-985, tenemos que colocar un 13. 

m POKE 2W0. 13 

Pues bien, aun con todo esto, cuando ejecutemos el programa, el Spritc no apa- 
recerá. Todavía hemos de hacer dos cosas: decirle al ordenador que active el 
Sprite de nivel 0 c indicarle en qué posición de la pantalla ha de imprimirlo. 

Kl C o m modo re tiene una dirección de memoria dedicada a comprobar si 
los diferentes Spritcs están activados o no. Esta dirección es la 53269. 



I I I I I I I I - l*«M2» 

m <•»> <»> '*> <*> a) dj ta» - Po4klón 



Si queremos activar el Spritc de prioridad 0 tenemos que colocar un 1 en 



POKE 53269. I | | | 



I 1 I ' I 



Si deseamos activar el Spriie de nivel 5 tenemos que colocalr un I en la posi- 
ción (5). 



— Jt rt — x * 



POKF StítW. 12 



Si queremos activar a la vez los Spriic de nivel 1, 3 y 5 tenemos que colocar 
un 1 en cada una de las posiciones (I). (3) y (5) 



PÜKt Í32W. J.H.32 1 1 I I 



Para desactivar todos los Sniiics podemos introducir POKE 53269, 0 . Así, 
d efecto de los contenida del byte 53269 lo podemos resumir en la figura 4.19. 
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F.« «.tt Aciímt*. y rir KH . mM i.'m .k I- v->,. mcdiuic el «Mu M2I» 

En el ejemplo que estamos desarrollando queremos activar el Sprite 0 . y 
para colocar un I en la primera casilla hacemos: 

200 POKE 53269, 1 

Y ahora loque nos laha es decirle al ordenador dónde queremos que impri- 
ma el Spiite. Para ello tenemos que volver a considerar la pantalla de alta reso- 
lución. 

Ya hemos mencionado que la pantalla de alta resolución está (orinada por 
-¡20 lincas \tnicalcs x 200 líneas horizontales. Sin embargo, cuando Dos referi- 
mos a un Sprite también hay que contar con Ir» puntos que contiene el borde. 
Un Sprite impreso en la parte del borde no será visible, pero esto nos permite 
una entrada suave, progresiva, de los Spritcs en la zona de pantalla. 
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R$ UO. Numcm «k U páMpOl pro In. Sp.ii« 

Para cada uno de los ocho Sprilcs que pode mo> ver al mismo tiempo, tene- 
mos que dai la coordenada horizontal (a) y la coordenada vertical (V) en la 
que Queremos que esté limado (observe que las Y aumentan de arriba ha. .a 
abajo). Para asignarles coordenada* a lo> frites U-m mos que introducirlas en 

ciertas direcciones de memoria. 
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Vamos a probar definitivamente nuestro programa Asignemos un 100 a las 
X y un IW a las \ de nuestro Sprile (recuélele (|ue era el Sprile 0). 

300 POKK 53248. IW> POKE 53249. 100 

Con ÍO que el programa toral quedaría en la forma: 

10 REM 

20 REM * GB.NEPRCION DE SPPITES ♦ 

3@ REM 

40 PRIHT\T 

50 FOR S=e TO 62:REfiP D ; POKE 832+S.»: NEXT S 
100 POKE 2840. t 3 
200 POKE 53269, 1 

FOR x=0 TO 255:PÜKE 53248»X- 
POKE 53249, 190 -NEXT 
REM 

PEM * FIGURA DEL IMVRSOP * 
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IifiTfi 
PftTR 
DflTfl 
T'ATA 

Dfltfl 
DATA 
PATA 
DflTfl 
DATA 
DflTfl 
PATA 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 
DflTfl 



0. 0. 6 
15, 0.240 
15.255.240 
31,255,240 



48 
43 

63 
12? 
96 
97 



126 
126 
231 
231 
231 ■ 
231 . 
67, 165. 

7, 36, 
14, 36, 
28, 102, 
56, 175. 
120. 129. 
120, 129. 
120-255. 
120. 60- 
120, 0. 
120, 0. 



P 12 
. 12 
.252 
.254 
■ 6 
. 1 34 
. 194 
224 
112 
56 
28 
30 
30 
30 
30 
30 
30 



EjeCUlC el prognmi para ver qué es lo 
buena! /V alia tle general su primer ' 
timos con él. 



la pantalla .Knhora- 

' i ahora a diver- 



Tamaño, color y movimiento 

Existen dos lormas de crear un Sprile de mayoi tamaño. La primera es im- 
primiendo juntos varios Spriles y la segunda es accediendo a cierta! direcciones 
de memoria que controlan el tamaño de los Spriles. Eslas direcciones son la 53271, 
pan duplicar el tamaño horizontal de los Npritcs y la 53277, para duplicar el 
tamaño vertical. 1-os números a introducir en estas direcciones dependen del 
Spriie que deseamos modificar. Así. en general; 
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Spmc 0 
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Fig 4.22. Influw-ndo rn el ■amafio, tutor o auivaclón de un Spriir* 

Donde d representa la dirección de memoria sobre la que deseamos actuar. Co- 
mo va hemos visto, existe una dirección, la 53269, que determina qué Sprites 



están activados. Ahora estamos estudiando que las direcciones 53271 y 53277 
controlan si se duplica el tamaño, tanto horizontal como vertical, del Sprite que 
hemos creado (Sprite 0 ; dirección 2tMfl). tendremos que introducir la línea: 

330 POKE 53271. I: POKE 53277. 1 

Y nos asustaremos c on el aspecto monstruoso de nuestro diseño. Pero ¿qué tal 
sí le damos algo de colorido? Para determinar el color de cada Sprite existe una 
dirección de memoria para almacenar el color de cada uno de ellos. 
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1*1$ 4 .'! Diiriiiimr* \ui* «ininilax rl «4ur dr 1"» Spmr» 

El color que asignamos a los Sprites se controla mediante el número que 
almacenamos en cada dirección. 
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F.« Numen» para tonirular el tufc* de fa» Sp»"« 

Por ello, para darle color rojo daro a nuestro Sprite introducirían»* la líne-i 

340 POKE 53287. 10 

pues nuestro Sprite. es el de nivel tí „ 

Para mover el Sprite tenemos que variar las coordenadas X e V de su pos 
ción (ver Fig. 4.20). Si quiere generar un movimiento vertical, borre en prime 
lut;ar la línea 300 anterior c introduzca la línea: 

360 POR Y- tí Tü 255: POKE 53248. 160 : POKE 53249. Y: NEXT Y 



Ejecute el programa, verá aparecer el Spríle por el borde superior y desapa- 
recer por el borde interior. Divertido, ¿verdad? Sin embargo, el control del mo- 
vimiento horizontal no es tan sencillo. Podemos, en principio, borrar la línea 
360 anterior e introducir la línea: 

360 POR X-0TO 225: POKE 53248. X; POKE 53249. 100 : NEXT X 

Y al ejecutarlo veremos aparecer el Sprite por el margen derecho y avanzar, pe- 
ro se para antes de desaparecer por el margen izquierdo ¿Por qué? Muy senci- 
llo, ya hemos visto que el número de puntos horizontales es de 32$ pero en la 
dirección 53248. que controla el movimiento horizontal del SPRITE 0 , sólo 
podemos colocar números del 0 al 225 y por ello se detiene antes de llegar ai 
final de la pantalla. Esto es fácil de arreglar. Cuando queramos que la coordena- 
da X de uno de nuestros Sprites llegue a valer más de 225, leñemos que indicár- 
selo al ordenador en la dirección de memoria 53264. En esta posición colocaremos 
uno de los números. 1, 2, 4. 8. 16, 32. 64 ó 128, según queramos que la coorde- 
nada X de lea Spritesfl 1. 2. 3. 4. 5. 6 ó 7. respectivamente, sea mayor que 225. 

t # y » . * * - 

ó* um. I I I I i 1 

POKE «264. 17 

r'ic. 4 25 tita ftectt* indita que la pWion I»» ¡ aimi.il He |m Spriici # Y *«■ i|(u.il 
a la Crtorrlrnarta X que ptinxarTK» tn H !>>'r de dirección YÍ24H v filttMv má» 255 

En nueMi-o (,imi queremos que. después de que el Sprite 0 recorra las posi- 
« iones horizontales de 0 a 225, siga su dirección horizontal hasta desaparecer 
por el lado del echo. Para ello, iras la línea 360 anlcrior. teclee: 

370 POKE 53264. 1: PÓR X - 0 TO 86: POKE 53248. X: NEXT X 

l^tí^JtTur d " c< h • Si m m ' # 

POKE 53264. 0 

Pues si el valórele la dirección 53264 sigue siendo 1. al volver a ejecutar el pro- 
grama, el Sprite comenzará a aparecer a partir de la coordenada X«255. 
F.l programa desarrollado hasta ahora se presenta a continuación: 

ÍO PEM ♦♦:*♦*♦ 
zn PEM i DENERfitlOH DE SPP1TGS « 

40 PRINTTf 

50 POP s*0 to 62 Prft?. D P'>E 

NEXT 3 
100 POKE 2043.13 
200 POKE 33269.1 

308 PEM ##*****»***:**********if*4**i**** 
PEM * TRMRNNi i CpLOR V MOVIMIENTO * 
PFM if ♦♦***♦♦♦***♦**♦'***«**♦* ♦*♦*♦♦ 

339 PQKF 53271 ■ 1 POKE 53277-! 

340 POKE 53287/10 



360 FCiP X=n TO 253:P0KF 5324?:. X- 
PQKE 53249# I 00 -NEXT X 

37R POKE 532*54 . 1 FW ! '=« TO 86 
PflKF 53248. X NHKT X 



400 

10000 

10010 

10020 
10030 
10040 

1 P0G0 

10070 
1 0080 

1 0090 
1 0 1 00 
101 10 

1 0 1 20 
101 30 

10140 
1015* 
10160 
10170 
10180 

10190 

1 0200 
10210 

1 0220 
10230 



oo ro j 00 



REM * FIGURA CIE I iMVhi .OR ♦ 
REM 

DflTfl m. 0, 0 

DATA 15. 0.?4i-i 

PATrt 15,255,240 

DA IR 3! . 25^. 240 

DATA 4&.126. 12 

DATA 43.126. 12 

f'HTA 6:¿.?:<1 .25? 

DATA 127-2 U ,254 

DATA 96,231, 6 

UftTñ 97.233 . 134 

DATA 67, 165. 194 

DATA 7, 36,224 

DflTfl 14. 36,112 

DATA 28.192. 56 

DATA 56, 195. 2¡=¡ 

DñTfi 120,129. 30 

DftTft 12". 129. "¡0 

DflTfl 120-255, 30 

nflTfl 120. 60. 30 

DflTfl 120, 0, 30 

DflTfl 120, 0, 30 



Sprites en multicolor y colisiones 

Y para animar algo más nuestro juego, el G-<>4 nm da la posibilidad dr pre- 
sentar nuestros Sprites en diversos (olores. Para indicar qué Spriic va a estar 
en diversos colores icndremos que utilizar la dirección de memoria 53276: 
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Fig 1.26. Bu* q« md«-n *. un Sp..w „ mutncolor «■ 



Para asignar la incala de coloridos que utilizan los Sprites se utilizan las 
direcciones 53284 y 53285. Introduzca en el programa anterior, por ejemplo, 
las líneas: 



110 POKE 53276. 1 
129 POKE 53284, I 
140 POKE 53287, C 
.180 C-C-l 

POKK 532o4. 0: GO TO 340 
CIO TO W 



V' compruebe la diversidad de colores que pueden ofrecerle los Sprites. Sustitu- 
ya la linea I2ttan<ciiur poi: 



120 POKK 53285, 1 

Y amplíe l.i |Misibilidad de colorido de los Sprites. 

Para detectar las colisiones emir los Sprites se utiliza la diivci ión de memo- 
ria 53278. Esta direci ión de memoria está iioimalmetile a 0, pero si rolisionan 
dos Sprites se coli»ra en ella la suma de los números que definen los niveles de 
los Sprites. Así, si rolisionan el Sprite 3, al que corresponde un 8, y el Sprite 
6, al que corresponde un 64. el número almacenado en 53278 será el 72 
(M »8-72). 

En yrncnil los Sprites tienen prioridad sobre el lexto que .quien- en l.i pan- 
talla, v si tiernos dejado algo escrito, veremos cómo el Sprile |ktsa |m» eni íina 
ile eslos laracteres. Esta prioridad, o no. de los Sprile se almacena en la direc- 
ción 53275. Según si queremos quitar la prioridad al SpritC 0ó al I ...ó al 7, 
pondremos un I en el hit 0. o en el 1 o en el 7 del hyle 53275. 

Además podemos detectar si un Sprite ha entrado en contacto con un carác- 
ter de la pantalla. Para ello se utiliza el octeto de la posición 53279. Si el Sprite 
W toliMon.i con un rarácier, se activa el hit 0 de la dirección 53279. 

Espasmos que UNI esto sea capM de diseñar sus propios juegos con los Spriies. 
En iodo caso recuerde que la única forma de aprender es practicando, equivo- 
cándose y rectificando. Apunte en su libreta cada cosa nueva que descubra, y 
sea ordenado. De poco le vale apuntar si luego no se acuerda dónde. 

Para que le sirva de ayuda le exponemos a continuación un resumen de las 
direcciones de memoria que hemos utilizado: 
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SONIDO 

La síntesis de sonidos CS una de- las c aracterísticas más sobresal ionios del C-64. 
I.as posibilidades do óseo son equiparables a las que proiH.re ionan sintoiizado- 
res profesionales. Kl COlttZÓn de la producción de sonido en el C-64 es un chip 
llamado SI O. del inglés Sound /nierface Tkvice, que iradui iríamos tomo dispositi- 
vo generador do sonido, eapiz de llevar a cabo por sí solo la producción del so- 
nido que lo ha encargado el Computador, dejando a éste libro paXB la realización 
do otras laicas, 

Sin embargo, como on ol caso do U » gráficos, el BASIC del C-64 no posee 
soiitoiu ias específiras parí el manejo del sonido y os necesario < olocar. medían- 
te POKE. varios valores on las direcciones adecuadas del SID para obtener el 
electo apetecido. 



Un poco sobre música 

I.as carae leríslicas sonoras del C-64 fueron conc ebidas principalmente para 
la producción de música. A lo largo do oslo capítulo, normalmente nos referi- 
mos a los sonidos, entendiendo como tales las notas musí» ales, a pesar de que 
las posibilidades del C-64 no so limitan a ellas, como ponen de manifiesto los 
electos sonoros que acompañan a muchos de los programas de juegos existentes 
on o) morcado. Sin embargo, los principios de produc e ion de cualquier tipo de 
sonidos son idénticos y no se pierdo generalidad concentrándose en las notas 

musical». 

Antes de comenzar a esludiar on de tallo la generación de «mide* en el C-64 
vamos a repasar algunos conceptos que serán importantes para comprenderla. 

LÍO eme permite distinguir dos notas diferentes, emitidas por un mismo ¡ns- 
irumonto. son sus frecuencias, es decir, el número do ose ilaciones por segundo 
de la onda sonora, lo que en términos musicales se corresponde con la altura 
o tono do la nota. Por ejemplo, la nota I.A de la octava central de piano corres- 
pondo a un sonido de una frecuencia de 440 oscilaciones/segundo, mientras que 
la nota DO de la misma octava corresponde a una frecuencia de aproximada- 
monto 262 oscilaciones/segundo. Nuestro oído es capaz de reconocer que la tre- 
menda de la ñora DO es menor truc la frecuencia de la nota LA y que. por 
tanto. DO os más grave que I.A. A la unidad de medida de frecuencia suele 
llamársc también ciclo/segundo o hertzio, que se abrevia como Hz. 

Kl oído humano puede percibir sonido de frecuencias entre 20 y 2000 Hz. 
pero la mayoría de las notas produc idas por instrumentos convencionales po- 



seen alturas que entran dentro del rango de ocho octavas que maneja el C-64 
y que almarca frecuencias entre 0 y 3996 Hz. 

El timbre es la propiedad del sonido que hace que dos notas de la misma 
altura emitidas por instrumentos diferentes suenen de forma distinta. Por ejemplo, 
si se escucha tocar el LA central con un piano y después con una flauta, no será 
posible decir si el primer sonido es más o menos agudo que el segundo, ya que 
ambos tienen la misma altura (naturalmente sólo en el caso de qué los dos ins- 
trumentos estén afinados), pero aun así podrá decirse que primero sonó un pia- 
no y luego una flauta. 

El timbre se relaciona con el contenido de armónicos que posee el sonido, 
es decir, con la cantidad o intensidad do las otras oscilaciones que acompañan 
a la oscilación fundamental. La oscilación fundamental posee la frecuencia co- 
rrespondiente al tono del sonido, y los armónicos tienen frec uencias múltiplos 
de olla. Si la frecuencia fundamental os f. sus armónicos tendrán frecuencias 
2xf, 3xf. 4xf, etc; por ejemplo, en el caso del LA central que antes se mencionó 
lo> armónicos tendrán frecuencias do HKO, I.S20, 1760 Hz, etc. ¡Pero un momen- 
to! Si los armónicos correspondientes a un tono dado son siempre los mismos, 
«cómo es que caracterizan el timbro del sonido? El timbro no está determinado 
sólo |ior la presencia o no do armónicos on ol sonido, y de hecho dos instrumen- 
tos que produzcan los mismos armónicos pueden sonar muy diferentes. Lo que 
realmente define al limbre es la intensidad do cada uno de los armónicos en 
relación con la intensidad del tono fundamental, y esto sí que es característico 
de cada instrumento. 

Un sonido con un tono y un timbre dados puede ser emitido con más o me- 
nos intensidad. La intensidad o volumen del sonido depende de la amplitud do 
:.is use ilac ione s que lo consliluycn: un sonido os tanto más intense) cuanto más 
amplias son las vibraciones que lo originan. Esta propiedad, al contrario que 
ol tono y v\ timbre', no r» estática, smo que c ambia a lo largo del tiempo, ionio 
se verá más adelante. También depende de la distancia de la fuente del sonido, 
disminuyendo al aumentar la sopante ión. debido al amortiguamiento que el airo 
ejerce sobre las ondas sonoras. 

La última característica a tenor en cuenta os que ol sonido so mantiene un 
cieno tiempo después que nace y antes de desaparecer por completo Este tiem- 
po en que se oye se conoce como su duración. 

Y bien, sin más dilai ión pasemos al esludio do las capacidades sonoras del 
Commodorc-64. 

El SID 

Las posiciones de memoria desde 54272 a 54300 corresponden a los 29 re- 
gistros del SID. Cada uno de estos registre* tiene una función específica que 
SC verá a lo largo de este apartado. De momento, nos concentraremos en la es- 
tructura de este circuito, aspecto básico para su comprensión. 

El SID dispone do iros voces independientes, osto os. puede producir simul- 
táneamente hasta tres sonidos distintos. Cada una de las voces se controla me- 
diante siete registros, todas ellas de forma muy similar. De los oc he» registros 
restantes, cuatro de ellos tienen func iones que afectan a la vez a las tres voces, 
y los otros cuatro, funciones especiales. Sigamos ahora la producción de sonidos 
dentro del SID y veamos on qué puntos podemos influir. 
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El sonido nace como una oscitación eléctrica en una parle del SID que se 
conoce como oscilador, El SID tiene tres osciladores y de ahí que posea tres vo- 
ces. La frecuencia y la forma de esta oscilación determinan, respectivamente, 
la altura y el timbre del sonido final. 

El SID dispone de cinco registros por cada voz para controlar esias caracte- 
rísticas de la oscilación originaf, dos dedicados a la frecuencia y tres a la forma. 

Ahora bien, un sonido normalmente no apante con una intensidad deter- 
minada y se mantiene así hasta extinguirse. Por el contrario, según un esquema 
mucho más general, la intensidad de una nota, emitida por un instrumento mu* 
sical, va cambiando mientras suena. Durante su primer período, que se deno- 
mina de ataque o subida, el volumen del sonido trece desde el nivel de no 
audición, correspondiente al momento en que se produce la nota, hasta el volu- 
men máximo, que alcanzará en toda su duración. A continuación, el sonido em- 
pieza a descender de intensidad hasta el nivel de mauienimiento. «pie alcanza 
en el tiempo llamado de raída. Viene luego un tercer período denominado fie 
sostenimiento o mantenimiento, es decir, el tiempo en que permanece al volu- 
men del mismo nombre, y finalmente cae de nuevo, hasta extinguirse, durante 
el período de relajación. A la curva de la figura 4.28. que describe la evoluc ión 
de la Intensidad del sonido en el tiempo, se le llama envolvente. 
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En la construcción del SID se ha tenido en cuenta esta característica del so- 
nido musical y se le ha provisto de un circuito que la reproduce automática- 
mente, el modulador de amplitud. El SID tiene también tres moduladores de 
amplitud, uno por cada voz, siendo controlado cada uno de ellos por dos nuevos 
registros. La señal eléctrica nacida en un oscilador se hace pasar a continuación 
por el correspondiente modulador de amplitud, del que sale -modulada» de acuer- 
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Las salidas de los moduladores pueden filtrarse para eliminar frecuencias 
no deseadas. Ll Col posee tres filtros distintos que pueden activarse, o no, por 
sepunido. También se puede elegir sejwradamente si la señal de cada oscilador 
va a ser o no filtrada, pero lí se opta por filtrarla lo será a la vez por todos los 
filtros activos. La frecuencia de corle define el punto en que centra el filtrado 
que. dependiendo del tipo de filrro, podrá activar de cada una de las siguientes 
(orinas: 

— S- dejan pasar sin modificación todas las oscilaciones que tengan frecuencia 
superior a la freí uetu ia de lortc, pero se filtran las frrrucneias menores, 
es decir, se reduce la intensidad (atenúa) de aquellas oscilaciones que ten- 
gan una Irecuencia más pequeña que la frecuencia de corte, de ahí que 
a este tipo de filtro se le llame pasa-altos. 

— Al contrario, se reduce la intensidad de las frecuencias mayores que la 
de corle, pero no se modifican las oscilaciones de frecuencia inferior. Ks 

el filtro pasa-bajos. 

— En un efecto combinado de los dos anteriores .se atenúan ludas las fre- 
cuencias, salvo las que se encueiiiran en un margen más o menos estre- 
cho alrededor de la frec uencia de corle, de ahí que a ese tipo de filtro 
se le llame pasa-banda. 

El SID tiene un filtro de cada uno de estos tipos que pueden actuar por se- 
|>arailo. o bien por parejas, o los tres a la Vez, según los que se encuentren acti- 
vos. Además puede controlarse la intensidad del filtrado, esto es, si la atenuación 
es mavor o menor sobre las frecuencias afectadas. A esto se le llama control de 
resonancia: cuanto mavor sea la resonancia mavor será la atenuación por parle 
de los filtros. 

Finalmente, todas las señales se mezclan y se hacen pasar por un amplifica- 
dor que controlará el volumen global del sonido: cuatro registros del SI D per- 
miten el control de los filtros y el volumen. 

¡Bueno, no espere más! Introduzca ya el siguiente programa y ejecútelo. 

F,l C-64 le mostrará alguna de sus capacidades para la producción de soni- 
dos interpretando para usted una famosa canción de cuna. Preocúpese ahora 
sólo de oír al ordenador v vuelva luego al texto para leer la explicación del fun- 
cionamiento del programa. 



Si se ha dado mucha prisa en introducir el programa y no ha leído antes 
este párrafo es posible que no haya oído nada. El C-64 envía sus sonidos al alta- 
voz del televisor, por lo que deberá «justar previamente el mando del volumen 
del mismo al nivel al que desee escucharlos. 

20 PM-t* CANCION DE Cünr . 

30 

40 SI.Ü = 54272 

39 POR í ■ STB TO SIIW>4 

60 POk-C 1,0 

70 NÉXT I 

3fl PERD T 

90 RFRD NN 

1 00 DTM R' NHV.f;-*HM • 

1 1B FOR I = i TO NN 

120 PEflD fl'IV.BíO 

130 NEXT I 

140 POKE SIB+24,15 

150 POKE SI0+6.240 

160 POKE SID+4v 17 

17( ; i REflD D 

180 IF D<0 THEN 24P 

190 REflD N 

200 POKE Srp.f!- N> 

210 POKE SXD+1..R(N) 

2S>0 FOP I = 1 TO D«T^ NEXT f 

230 GOTO l?0 

240 POKE SID+24.0 

250 FND 

50O DflTfl 160 

600 ORTft $ 

610 DflTñ 22, 225% 23, 177 > 28 .214. 39 > 141 

€20 DRTR 34,75/30» 126^43.52.45. 198 

700 DRTR ¡U3>li3 

710 DRTR 4,5. 1.3. 1 .3 

720 DRTR 4,5.1 .3.1 .5 

730 DRTR 2.8.2.7.2,6 

740 riflffl 2,6,2.5, 1 .2. 1 .3 

750 [Ififfl 4,4, 1 .2, 1,3 

760 riRTfl 4,4, 1,2.1 -4 

770 DRTfl 1 1 7, 1,6,2.5,3*7 

780 DRTR 4.5.1,1,1-1 

790 DRTR 2.8,2,6.2.4 

800 DRTR 4-5,1,3.1.1 

3Í0 DRTR 2.4.2,5.2-6 

820 DRTR 2-3,2,5,1-1.1,1 



830 DRTR 2,8.2,6,2,4 
840 DRTR 4,5,1.3,1.1 

850 PRTR 0.67.4,0.67.5.0.^.7.4,2.3.2.2 
860 DRTR 4 - 1 
Qaq pflTR -1 

Antes de entrar en la descripción del uso de los registros del SID, estudie 
brevemente, y a modo de introducción, cómo trabaja este programa, ya que le 
servirá de base para poder apreciar los distintos efectos que pviede introducir. 

En la variable SID de la línea 40 introducimos el valor correspondiente a 
la primera posición de memoria asignada a registros del SID a fin de hacer más 
cómoda la referencia a los mismos. 

El burle que empieza Cn la línea 50 y termina en la 70 se encarga de poner 
a 0 todos los registros cuyas direcciones nos interesan, de la 54272 a la 54296, 
con ello conseguimos limpiar el chip de sonido. 

I-a sentencia READ T de la línea 80 lee el primer DATA, que es el situado 
cn la línea 500 . es decir, se introduce cn la variable T el valor 160 , que es la 
duración de una corchea. 

En la línea 90 . READ NN lee el segundo DATA, situado en la línea 6W0 
y por tanto la variable NN loma el valor 8, que es el número de notas diferentes 
que constituyen la canción. 

En la línéa 100 dimensionamos dos listas: A (8) y B (8), que utilizaremos 
para que contengan las panes alta y baja de las frecuencias {se aclarara este punto 
más adelante). 

Con el bucle situado desde la línea 110 hasta la 130 leemos los 16 siguientes 
números contenidos en sentencias DATA (líneas 610 y 620). asignando a las va- 
riables A (1), A (2) A (8) los valores correspondientes a la parte alta de la 

liciucnuadc las notas y a B (1), B (2) B (8) los correspondientes a la parte 

baja de la frecuencia, por ejemplo, A (I) contendrá el valor 22 y R (I) el 227, 
que son respectivamente los valores tul respondientes a las partes alta y baja de 
la nota FA de la octava cuarta (Consúltese Fig. 4.30). 

La dirección SID* 24 (línea 140) controla el volumen general que ponemos 
al máximo con el valor 15. 

El valor 240 que introducimos en la dirección de memoria SI D + 6 (línea 150) 
ajusta los valore:, elegidos de sostenimiento y relajación para la voz 1, Espere 
un POCO y los entenderá. 

La dirección SID* 4 (línea 160) controla la forma de onda de la voz I, única 
utilizada en este programa, y el 17 es el corrcs|>ondÍeiitc a la forma triangular. 
Pronto se le explicarán las formas posibles. 

En las líneas 170 a la 230 se «leen y hacen sonar» todas las notas. La condi- 
ción -IF D<fl. de la línea 180 se pone para que si el último valor leído es el 
— I, el control pase a la línea 240 en la que se pone a 0 el volumen, con lo cual 
se consigue que deje de sonar. 

Las líneas 200 y 210 sitúan en las direcciones 54272 (SID) y 54273 (S1D+1), 
respectivamente, la parte baja v alta de la frecuencia de cada nota. Y el bucle 
de la línea 220 es un bucle de espera, que será distinto para cada nota y propor- 
ciona) a su duración. 

En la línea 250 END indica el final del programa; detrás no hay nada eje- 
cutable. 

El resto de las líneas de la 500 a la 999 son DATA. 

No borre este programa de la memoria de su ordenador. Más tarde intro- 
ducirá modificaciones cn él para que pueda observar el efecto de cada registro 
del chip de sonido. 
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Control del SID 

Después de estudiar el programa anterior es posible que le haya parce ido 
muy complicado hacer música con el C-64. Lo cieno es que no es fácil, pero 
si so siguí- un método es posible hacerlo. En esle apañado se le darán unas re- 
alas <ju<- Ir permitirán construir sus propios programas musicales sin que le sur- 
jan <iilinil(ades insalvables.. 

Ks bueno, antes de reali/.ar ninguna otra operación, -limpiar» los registros 
del sonido, como hacen las líneas 50 y 70 del programa anterior, de lo contrario 
pueden aparecer sonidos inesperados. Después de esto tendrá que poner el vo- 
lumen al nivel que desee utilizar, ya que. de realizar esta operación tras las otras, 
tíl ordenador puede sorprendentemente quedar callado. Para definir el volumen 
introduzca un número entre 0 y 15 en la dirección 54296, o bien SID + 24 si 
hace SiD 54272. Introduzca las siguientes líneas en su programa. 

135 FOR VOL- 15 TO 1 STEP —2 
245 NEXT VOL 

Y modifique la línea 140 para que sea ahora: 

140 POKE SID+24. VOL 

Ejecute nuevamente el programa y compruebe cómo va disminuyendo la inten- 
sidad del sonido a cada interpretación de la canción. 

Tras el volumen debieran establecerse los parámetros del modulador de am- 
plitud para cada una de las voces que se vayan a usar. Para hacerlo, seleccione 
el nivel de sostenimiento a utilizar, que deberá estar entre 0 y 15, y de la tabla, 
los valores de ataque, caída y relajación que correspondan a los tiempos corres- 
pondientes que se requieran. Coloque ahora estos valores en los registros de 
ataque-caída y sostenimiento- relajación de las voces elegidas que corresponden, 
respectivamente, a las direcciones 54277 y 54278 (SID*- 5 y SID +6) para la 
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Fig. 4 51 

Siendo A rl valor para el ataque, C el de caída, S el de sostenimiento y R el 
de relajación. Se le brinda más adelante un programa con el que podrá 
experimentar, modificando la envolvente del sonido que se produce. 

A continuación, y aunque no se haya hecho asi en el programa anterior, es 
el momento de fijar la frecuencia del sonido que se desea producir. Para ello es 
necesario, como podrá observar en las lincas 200 y 210 del programa, colocar 
dos valores a sendos registros del SID. En la figura 4.30 puede observar que a 
cada nota corresponden dos números, uno que se ha llamado parte baja de la 
frecuencia y otro al que denominamos parte alta. Pues bien, para determinar la 
frecuencia debe ponerse el valor de la parte baja de la frecuencia en la 
dirección 54272 ;S1D ( 0) si lo es para la voz 1, en la 34279 (SID- 7, si lo es 
para la 2 ó en la 54286 (SID f 14) si se trata de la voz 3. Asimismo, la parte 
alta de la frecuencia deberá ir, respectivamente, a una de las direcciones 54273 
iSID f ];, 54280 ;SID-8; ó 54287 (SID4-15). 

Para hacer sonar la nota sólo es necesario ya definir la forma de onda que 
habrá de producir el oscilador seleccionado. En el C-64 hay cuatro posibles 
formas de onda a cada una de las cuales corresponde un valor a colocar en el 
registro 54276 ¿SID + 4) para la primera voz. en el 54283 (SID+11) para la 
segunda o en el 54290 (SID+ 18) para la tercera voz. 

Los nombres y valores de estas formas de onda se recogen en la figura 4.32. 
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)tra vez le proponemos probar el efecto de las di: 
lo cual tendrá que hacer los siguientes cambio? 



cambios en el programa: 



— Introduzca las líneas: 

135 FOR F-4TO 7 
245 NEXT F 

— Devuelva la linca 140 a su forma original: 

140 POKE SID -24, 15 

— Y modifique la linea 160 para que quede: 

160 POKE SID r 4, 2 F+-1 

Ahora ejecute el programa y, ¡fíjese en los diferentes timbres! 

En la figura 4.32 verá que para cada forma de onda se recogen dos 
números, uno en la columna «comicn/o de la nota» \ otro, igual al anterior 
menos uno en todos los casos, que figura como «fin de la nota». 1-i razón es que 
cuando se introduce el primero de estos números, pongamos el 1 7, en el registro 
de foro» de onda correspondiente se inicia el ciclo de la envolvente: comienza 
el periodo de ataque que terminará un cierto tiempo después de acuerdo al 
valor definido según la figura 4.31, después vendrá la caída, que durará, 
igualmente, el tiempo correspondiente de dicha figura, y a éste le seguirá el 
periodo de sostenimiento en el nivel elegido entre 0 y 15) que durará... 
¿Cuánto durará? Pues justo hasta que el registro de forma de onda pase a tener 
(porque se ponga en él con POKF.i el valor de «fin de la ñola». En ese 
momento comenzará el periodo de relajación, cuya duración dependerá del 
valor elegido de la figura 4-31. 

Ahora bien, en el caso de la onda rectangular aún hay más. En efecto, este 
tipo de onda es, realmente, un conjunto de tipos de onda. En la figura 4.33 
puede ver el aspecto de una oscilación de este tipo: periódicamente pasa de un 
estado en el que es máxima (pulso) a un estado en el que es mínima 
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El SID permite controlar el ancho del pulso, para lo que dispone de dos 
nuevos registros por voz: el de la parte baja del ancho de pulso (registros 54274 
ó SID + 2. 54281 ó SID - 3 y 54288 ó SID+ 16), en el que pueden introducirse 
valores entre 0 y 255, y el de la parte alta del pulso (registros 54275 ó SID + 3, 
54282 ó SID— 10 y 54289 ó SID+ 17), cuyos valores han de estar entre 0 y 15- 

Pruebe rl efecto de cambiar el ancho del pulso introduciendo las siguientes 
modificaciones en su programa: 

— Introduzca las lineas: 

135 FOR P 0 TO 15 
165 POKE SID-3, P 



Modifique la línea IbQ para que aparezca como: 
160 POKE SID - 4, 65 

Ejecute ahora el programa y escuche cómo va cambiando el timbre. 

Aún hay otro medio de modificar el timbre del sonido generado, y es 
mediante el empleo de los filtros. Para programar los filtros comience por 
seleccionar las voces a filtrar y el nivel de resonancia que desea (debe estar 
entre 0 y 15). Multiplique el valor de la resonancia por 16 y súmele l para 
filtrar la voz 1. 2 para filtrar la voz 2 y/o 4 para filtrar la voz 3. Coloque el 
resultado en el registro 54295 i SID • 23). al nivel que desee para el volumen, 
súmele ahora 16 si quiere activar el filtro pasa-bajos, 32 si quiere activar el 
filtro pasa-bajos, 32 si quiere activar el filtro pasa-banda y/o 64 si desea activar 
rl filtro pasa-altos, v coloque el valor resultante en el registro de volumen, esto 
es, en el registro 54296 (SID--24). 

Para terminar, delx:rá definir la frecuencia de corte. Para ello tiene que in- 
troducir un valor entre 0 y 255 en el registro 54294 (SID* 32) y un valor de 
0 en el 54293 (SID + 21). El Drimcr valor será la parte alta de la frecuencia de 
corte, y el segundo, su parte baja. Para obtener el timbre adecuado tendrá que 
experimentar varios valores para la frecuencia de corle. 

En la figura 4.34 se resumen las funciones de cada registro del SID y se le- 
da una breve «receta» para que le sirva de guía al emplearlos. 

Quedan por comentar las funriones de los registros 54297 a 54300 (SID + 25 
a SID + 28). Estos registros pueden ser leídos con PEEK. pero no escritos con 
POKE. I,os registros 54297 y 54298 (SID + 25 y SID + 26) se utilizan para el 
control de mandos de juegos y no tienen aplicación en sonido. 

El registro 54299 (SID + 27) contiene en todo momento la salida del oscila- 
dor 3 y permite producir brillantes efectos sonoros, aunque para ello es preciso, 
en general, programar en código de máquina. 

Finalmente, el registro 54300 (SID + 28) contiene en cada instante el valor 
de la envolvente de la tercera voz y se le puede aplicar lo indicado para el regis- 
tro anterior. 
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Algunos programas sonoros 



Como roblón, le- pnsviiUuiKK dos programas qiic le permitirán pnAintlizar en las 
iHi'ailcrísti(Hs del sonido dd C-64. 

^ Fmrxy^irrmos por mi pmgnuna pBOl exprnincnUir ton k* decios dd modvilador 



100 REri******************************** 

tío PEM#PEMOSTPftGI0N DFL. EFECTO PEI Ff.» 

12? PPrNT"^RTfiOIJF" • 'TRIDA" . "SOSTEN" . 
"PEI RX" 

124 FOR N = 1 T0 41-Bí= B*+" " NEXT N 

130 REM PATOS BE LAS NOTHS 

132 PATA 97.8.104,9.143,10.43.11.143.12. 

24/14,210, 15 
134 PATA 210.15,24,14,143,12.43.11.143- 

10.194.9.97,3 



150 RFM VOLMMFN MAXIMO 

155 POKE 54272,0 - POKE 54273,0 

160 POKE 54296, 15 

170 PEM VALORES INICIALES DE A DSP 
180 A?: = ¿ IV. = 6 >$'/.= 6-R'/. = 6 
190 PPINT "«HW" ; K$; H" ; A?S . DE , S/í . PE 

196 RESTORE 

198 FOP N = 1 TO 14 

200 PEM COLOCAR PHPAMFTROS DEL EG 

210 POKE 54277/ flX*l£+BX 

220 POKE 54278, SSfclS+R?. 

230 PEM COMENZAR EL SONIDO 

232 READ IX,W 

234 POKE 5427?. L2 • POKE 54273 • HE 

240 POKE 54276,33 

250 M ■ lOOOOSUB 800 

\>m PEM TERMINAR FL SONICO 

300 POKE 54276.32 

311 PEM GENERflR B NUEVCi SONIDO 

312 NEXT N 
320 GOTO 1^6 

500 PEM RUTINA PF CAMBIO 

510 IF A*>»"«" THEN ON A3C''A$ »-l 32 OOSUB 

^40 . 550 ■ 560 ■ ' - . 7 « . 580 - 590 . 600 > 6 1 0 
520 PPINT "WW" ; B* . "1" . a:": • DE . se ■ PE 
^■30 RETURN 

540 a;: * rx-<ax<15> return 

550 DE ' DX-<D5á<15) RETURN 
560 S2 - SX-<S5i<15> RETURN 
570 PE = R#-<R?£<15) RETURN 
5«0 RE = a::+<a , í>0> : PETUPN 
590 DE - D5£+-'PE>0) : RETURN 
6O0 SE ■ SE+<SE>0> ; RETURN 
610 RE = Rrí+<R5Í>0) : RETURN 
800 REM ESPERAR HN pnrii 
S10 FOR T = 1 TO M 

820 OET Aí : IF fl*<>" "THEN 00SU8 500 
830 NEXT T 
840 PETUPN 

mente se esté preuntancln si ninguno va emplear más de una \u¿. Pu«. sí, 
nene una melodía para Navidad 

50 PEM* NOCHE PE PAZ * 

30 



40 SID = 54272 

30 FOP f = SID Tp SID+24 

60 POKE 1.0 

70 NEXT I 

80 READ T 

90 READ NN 

100 DIM R<NN> ■ B' HN> 

110 FOP I = 0 TO NN 

i.?0 rerp fKn.Ba.) 

130 NEXT I 

133 REflD NN 

133 DIM RR(NN)*BB<NN) 

133 FOR I « 0 TO NN 

134 REflD RH<I>,B8<P 

135 NEXT I 

140 POKE SID+24, 15 

150 POKE SID+6.240 

160 POKE SIB+13-64 

165 POKE SID+11-17 

167 IF D>0 THEM 211 

170 REflD D 

180 IF D<0 THEN 240 

190 REflD N 

192 POKE SID+4. 17 

200 POKE S1D.B<N> 

210 POKE SID+1 .fl<N> 

211 IF DD>0 THEN 220 

212 REflD DD 

213 IF DDO THEN 240 

214 REflD N 

215 POKE SID+?/BB<N) 

216 POKE 8lB*8,ñflCN) 

217 POKE SID+1 1 , 1 

220 FOR I = 1 TO T«0.9 NEXT I 

221 IF D=l THEN POKE 8IB+4.16 

222 IF DD=1 THEN POKE SID+IL16 

223 FOR I = 1 TO T*0. 1 NEXT I 
225 D = D-l DD = DD-1 

230 GOTO 167 

240 POKE SID+24, 0 

250 END 

500 DATA 150 

609 DRTA 10 

610 DATA 21, 154.22.227.2S. 177.28.214. 32.94 
620 DATA 34.75.33. 126. 43. 52. 4^.1*8, 19,63, 17.37 
630 DRTfl 7 

640 DATA 14,24,8.97.10,143,12,143 



k50 DATA 11.48.6.71.7,233.9.104 
700 DATA 3.2,2.1.2,2,1,3.2.2.2.3 
710 DATA 6,0.2.1.2.2.2.3 
720 DATA 3,2,2.1,2,2.1.3.2,2.2,3 
730 DATA 6.0.2.1.2.2,2.3 
740 DATA 4.6.2.5.2,6.2.6,2.7 
750 DATA 6.4.2,5-2,6,2,7 
760 DATA 4.5,2.1.2.2.2,5.2.3 
770 DATA 6,2.2,1.2.2,2,3 
780 DATA 4.3,2, ! .2.4,2.3.2.0 
790 DATA 3.5.2,1.2.4,1.4.2,3.2.0 
800 DATA 3.2,2.1,2.2,1.3.2.2,2.3 
810 DATA 6.0.2,1.2,2.2.3 
32H DATA 4,3.2,1,2,4.2-3.2,0 
330 DATA 3,5.2,1,2.4.1,4-2.3,2.0 
840 DATA 3.2,2,1,2,2,1.3,2.2.2,3 
850 DATA 6.0,2,1,2.2,2,3 
860 DATA 4,6.2.5.2.6.2,6,2,7 
379 DATA 3.8.2.5.2,6,1,6,2.4,2,7 
880 DRTfl 6,5.2,1.2.2,2,3 
890 DATA 6.7,2,1.2,2,2,3 
900 DATA 3,5,2-1.2.2, 1,2.2.0,2.3 
910 DATA 3,2,2.1.2,2.1.1,2,9,2.3 
*20 DATA 12,10.12,3 
999 DATA -1 



Apéndice A: Otros periféricos 



¿Ha llegado hasta rale apéndice.' ¡Enhorabuena! Usted ha decidido superar 
la etapa dedicada a los juegos y pequeños programas de entretenimiento y con- 
venir su Commodorc én una potente máquina de cálculo y gestión. En primer 
lugar, vamos a estudiar rl dispositivo de discos; esc- artefacto que da una nueva 
potencia y velocidad a nuestro trabajo. Después, realizaremos una revisión de 
la utilización de In impresora tiara aquellos que hayan decidido que desean apro- 
vechar también la posibilidad de presentar sus trabajos mediante el G-64 y de 
sacar listados de sus programas que les permitan una revisión de éstos sin tener 
que perder la vista ante la pantalla 



LA UNIDAD DE DISCOS 
Instalación 

Al desempaquetar la unidad de discos tendrá que encontrar los siguientes 
elementos: 

1. La unidad de discos. 

2. Un cable gris para conectar la unidad de discos al enchufe de la pared. 

3. Un cable negro para conectar la unidad de discos al C-64. 
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Coloque la unidad de discos cerca del C-64 y vamos a comenzar a instalar- 
lo. En primer lugar, desconecte el Commodorc. lome el cable negro y conecte 
una de las clavijas terminales a una de las conexiones serie que hay en la pane 
posterior de la unidad de discos (ver Fig. A. 3). y el otro extremo, en la conexión 
en serie del Gomrnodore 64 (ver He. 1.3). Compruebe que el interruptor de 
la unidad de discos (ver Fig. A.3) esta en posición de desconectado (OFr) y uti- 
lice el cable gris para conectar la unidad al enchufe de la pared. Antes de activar 
el interruptor compruebe que no hay ningún disquete dentro de la unidad y 
pulse el interruptor de la unidad de discos para activarlo (luz verde encendida). 
Pulse ahora el interruptor (ON/OFF) del C-64 y ya podemos empezar a traba- 
jar. Recuerde esta secuencia de conexión y que siempre el último interruptor 
a pulsar cu el del Commodore. 

Habrá observado que en la parte posterior de la unidad de discos aparecen 
dos enchufes para conexión en serie. Uno lo tiene ocupado para unir el Com- 
modore con la unidad de discos, el otro es para poder conectar, a esta unidad 
de discos, otra unidad de discos o una impresora. Siguiendo esta secuencia po- 
demos llegar a tener conectadas hasta cinco unidades de disco y una impresora. 



El disquete 

Es un disco pequeño (de cinco pulgadas y cuarto: 5'/«) construido con un 
material pliíslico flexible y cubierto por una superficie magnética que es donde 
se graUinín l<» dalos. Viene dentro de una funda protectora, generalmente ne- 
gra, y colocado dentro de un sobre del que es fácil extraerlo. En las figuras A.4, 
Á.5 y A.o se exponen, respectivamente, la forma de introducir el disquete. la 
estructura interna del disquete y las especificaciones técnicas del disquete. 
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Antes de insertar el disquete compruebe que la luz verde está encendida y 
la luz roja apagada. Presione la placa que tapa la boca de la unidad de discos 
y ésta se desplazará automáticamente hacia arriba. Tome el disquete (sácpielo 
del sobre, pero no de la funda) con la etiqueta hacia arriba e introdúzcalo con 
suavidad por la boca de la unidad. Si encuentra alguna resistencia, no empuje, 
vuelva a sacar y a introducir el disquete hasta que la operación se realice sin 
dificultad. Una vez dentro el disquete, empuje hacia ahajo la placa de la boca 
y ya está preparado para utilizarlo. 



(liando ulílice la unidad de discos se encenderá la luz roja. Si la operación 
se efectúa correctamente se apagará la luz roja, y si no desea utilizar más el 
disquete ya puede sacarlo. Si la operación ha sido incorrecta, la luz roja queda- 
rá intermitente Realice la operación correctamente y esta intermitencia des- 
aparecerá. No introduzca ni saque el disquete con la luz roja encendida o en 
intermitencia, esto puede dañar su contenido. 

Para sacar el disquete presione hacia dentro la placa que tapa la boca de 
la unidad de discos, y un mecanismo automático hará que parte del disquete 
salga fuera para que pueda retirarlo cómodamente. 

Observe, en la figura A.4, la muesca de protección situada en el borde iz- 
quierdo Generalmente en un disquete podemos grabar y leer información. Si 
queremos proteger un disquete, de modo que se pueda leer la información con- 
tenida en el, pero que no puedan grabar, no vaya a ser que estropeen nuestros 
programas, basta con tapar la muesca de protección con un trozo de cinta plás- 
ca o de |mim-I adhesivo. 
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En la Figura A.C se traca de ilustrar la estructura del disqucie. Está (orinado 
por una sene de pista» (35) cada una de las cuales cslá dividida .n cores (en- 
tre 17 y 21 dependiendo de la pista) Estos disquetev son de simple tara, simple 
densidad, sin emlxirgii. puede ulin/ar disquetes de simple rara. Mié densidad, 
o de doble cafa, doble densidad. 

lodo depende del preño y la accesibilidad. En un disquete. podemos grabar 
muchos programas, peni el direccorio sólo puede guardar hasia 141 nombres 
ele programas o ficheros de datos. 

En esle apéndic r vamos a \er todo lo relacionado con una unidad de di» os. 
con ficheros de programas y con ficheros secuenc iales de dalos, Quizá eche en 
fulla la explicación del uset de más ele un disquete y ele los ficheros de acceso 
alealorio. pero amUis cosas exceden el nivel de este libro. 

Ficharos de programas 

Lo primero que desearemos hacer con nuestro disquete es ver qué progra- 
mas contiene o grabar en ellos los programas que vayamos creando. Clan) que, 
antes de grabar un programa, tenemos que ¡metalizar el disquete. y esto lo vere- 
mos en la sección siguiente. 

Reproducción de pro «ra mal 

Para cargar en el C-64 los programas que tengamos grabados en el disquete 
utilizaremos el comando: 



LQAD "«nombre del programa-". »núm. del dispositivo*, 
«núm. de comando» 



Nombre del programa: Una constante o variable alfanumérica que 
contenga no más de 16 caracteres. Asi. nombres válidos son «PRUE- 
BA». «PROGRAMA 14». AS, OTROS- 

Núm del dispositivo: Si estamos utilizando una sola unidad de disque- 
te. este número es el 8. Si no ponemos este número, el C-64 
intentará cargar el programa de la cinta. 

Núm de comando Si omitimos este número o ponemos un 0. el 
programa se cargaré en ta memoria normalmente, esto es, desde la 
primera dirección de memoria disponible para programas en BASIC 

tzzz ivügs^z&s las mismas dlrecc,ones 



Por ejemplo, para cargar el programa «PRACTICA., utilizaríamos el 
comando: 

LOAD ' PRACTICA", « 

Pulse RETURN. y si el programa «PRAX OT< ¡A* cstalw grabado en el disquete 
vera aparecer en la pa malla la secuencia: 

SEARCHING POR practica 

I.OAOING 

READY 

\ ahora va put ei, lee lea r Rl \ v pulsar RETI R\ para .•]«■« utas el piogra- 
ma Si el programa no estaba en este disquelc ajMieceiá la secuencia: 

SEARCIIINC FOR PRACTICA 
? FILE NOT FOl M) ERROR 
REAÜY 

Y la luz rnjn de la unidad de discos quedara iniermitente 



Es deeir, puede que no supiéramos cuál era el nombre del programa o nos 
hayamos equivocado al teclearlo. Para ver los nombres de programas que tene- 
rnos rargadm en un disquete. introduzca el comando: 

LOAD "S 8 

Y verá aparecer los mensajes: 

SEARCH1NC FOR S 

LOADING 

READY 

Teclee LIS'F. pulse RETURN y en la pantalla aparecerá el listado de los nom- 
bres de los ficheros grabados en el disquete- 



Grabación Je programa! 

Pan grabar programas en el disqucie, introduzca d comando: 



SAVE "«nombre del programa*", 8 



La unidad de discos mirará pr imero si todavía cabe un nombre de progra- 
ma más en el directorio, después si hay suficientes sectores para almacenar el 
programa, y si todas eslas comprobaciones son satisfactorias, su programa se 
grabará en el disquete. 

Verificación de la grabación 

Para verificar si la grabación ha sido correcta, introduzca el comando: 

VERI F Y "-nombre del programa*". 8 

Y así comprobará si el programa cuyo nombre es ..nombre del programa- coin- 
cide con el programa que actualmente hay en la memoria del C-64. Si la verifi- 
cación no finaliza con éxito tendrá que comprobar m el nombre del programa 
indicado es correcto, y si así es tendrá que volver a grabar el programa, ruede 
que haya ¡menudo grabar sin un disquele en la unidad de discos. 

Hablando con la unidad de discos 

AfftUtc de estas acciones sencillas, reproducir, grabar, verificar, para aprove- 
char las posibilidades del disquete tendremos que aprender una nueva instruc- 
ción (bueno, ya la hemos visto en el capítulo 3. pero no está de más reiordarla). 



OPEN »n.f». -n.d-, «canal", "«texto»' 



n.t: Es el número de fichero Número que utilizamos para acceder al 
fichero, puede ser cualquier número del 1 al 255. pero es peligroso 
utilizar números mayores que el 127, pues la sentencia PRINT # 
genera un salto de línea adicional a la generada por el carácter del 
RETURN. 

n.d.. Número del dispositivo En el caso de una unidad de disquetes es 
el 8. 

Canal: Es el número de canal que utilizamos para acceder al disco. Los 
números Q y 1 se utilizan para reproducir (LOAD) y grabar (SAVE), 
respectiva mente Los números del 2 al 14 son los que emplearemos 
para los ficheros de datos. El número 15 es el dedicado al canal de 
comandos. 

Texto: Es un texto que imprimiremos en el fichero. 



i instrucción que nos permitirá dar órdenes a la unidad de discos 
y manejar tácilmentc el contenido del disquetc que tengamos en ella. Es difícil 
pensar en algún ejemplo, así que lo mejor es comenzar a utilizarla rápidamente. 



Recuerde que de los tres números que siguen al OPEN. el primero puede 
ser cualquier número del 1 al 255. El segundo será un 8. si estamos utilizando 
una sola unidad de discos, y el tercero, el número de canal, dependerá de la 
operación que estemos realizando. 



El canal de comandos 

Como acabamos de ver. el número que corresponde al canal de comandos 
(tercer número tras el OPEN) es el 15. r ;Y qué comandos directos le podemos 
dar a la unidad de discos* Pues le podemos decir que copie un programa, que 
borre otro, que le cambie el nombre a un fichero y muchas cosas más que vere- 
mos a continuación. 



Formaifando un dUqutte 

Recién comprado un disquele, y antes de poder utilizarlo, para grabar algo, 
tenemos que formatearlo. Es algo así como un reconocimiento, por parle de la 
unidad de discos, del estado del disquete. se marca cada bloque y se crea el di- 
rectorio, lénga cuidado de no formatear un disquele en el que tenga grabado 
algo que sea importante, pues en este proceso borrará todos los ficheros que ten- 
ga grabados. El comando tiene la estructura siguiente: 

OPEN 1.8.15 



PKINI VI. "NEW: nombre del disco, ID" 



NEW: Es el comando (nuevo). 

Nombre del disco: 16 caracteres como máximo. 

10: Número de identificación. Como máximo dos caracteres. 



Observe que detrás de PRINT va el símbolo de almohadilla y delras de éste 
va el mismo número que havamos puesto en primer lugar iras el O" 

La palabra NEW. la podemos abreviar por la N. quedando la seguí 
en la forma: 



PRINT»!. "N: nombre del disco. ID" 



Si tenemos un disquete va formatcado y lo único que deseamos es cambiarle 
el nombre y borrar lodos los datos que hay en él utilizaríamos: 



PR1NT#1. 



disco" 



Este proceso es mucho más rápido que formatear el disco de nuevo y con- 
servamos el mismo número de identificación. 



Fíjese en que liemos separado el comando OPEN del comando PRINTf, 
en realidad esto tío es necesario. Como veíamos en el apartado anterior, pode- 
mos ponerlo todo seguido en la forma: 



OPKN, I.H.I5, "N: nombre del disco. ID" 



Esto es aplicable a este caso y a los que vamos a ver a continuación, sin embargo 
recuerde que cuando estamos trabajando con el (anal de comandos, la longitud 
de la orden no puede sobrepasar la longitud de una línea, esto es. cuarenta ca- 
racteres. 

láidiliníién 

Este comando sirve para volver la unidad de disco* a su estado original, siem- 
pre que ocurra una situación de error. Su formóte es: 



OPEN 4,8.15. "INITIALIZE" 



ó bien: 



OPKN 4.845, "I" 



Cop» de fichero. 

Este comando nos permite copiar un fichero (bien sea un programa o un 
fichero de dato») Con Mru nombre en el mismo disquetc Esto es. tenemos un 
programa que se llama «Viejo nombre- y le decimos a la unidad de dix ik que 
nos cree una COpia de Cfte fichero con el nombre «Nuevo nombre- mediante 
el comando: 



OPEN (.,8.15 

PRINT#6. "COPY; Nuevo nombre-Viejo nombre" 



V ahora tenemos dos programas iguales: uno en «Viejo nombre- y otro en -Nuevo 
nombre». Como en todos los comandos de esta sección, la páhbra COPY la 
podemos abreviar por su primera letra, en este caso la C. quedando el comando 
en la lónna: 



OPEN n.8.15, "C: Nuevo nombrr=V'iejo nombre' 



Este comando nos sirve también para unir, o concatenar, dos ficheros o para 
crear un nuevo fichero. Por ejemplo, suponga que queremos unir la Subrutina 
I y la Subrutina 2 para crear el programa Nuevo prog.; en este caso utilizaremos: 




Observe que con ello no borramos ni c ambiamos los nombres de los progra- 
mas Subrutina 1 y Subrutina 2. Simplemente creamos un programa "Nuevo 
prog." con una copia del contenido de los dos anteriores. 



Cambio del 



de un fichero 



También existe un comando que nos permite cambiar directamente el nom- 
bre de un fichero (renombrar). Suponga que leñemos un programa llamado «Viejo 
nombre- y ahora queremos llamarle "Nuevo nombre". Utilice el formato: 




Si ahora cargamos el directorio (LOAD "$", 8), veremos que el programa 
"Vicio nombre" ya no existe y que en su lugar ha apare» uto otro llamado "Nuevo 

""Como atemore, el comando RENAME lo podemos abreviar mediante su 
primera letra: K 



t >rM-.N l ».H.r. 

PRINT» IT», "R: Nuevo nombre-Viejo nombre 



Borrado de fichero» 

Para borrar un fichero del disquetc. utili/aiemos el comando SCRA'ITIH. 
Por ejemplo, para borrar el fichero cuyo nombre es «NOMBRE DE FICHE- 
RO», utilizaríamos el lormato: 



OPEN 1.8.15 

PRINTíl. "SCRATCH: NOMBRE DEL FICHERO' 



O utilizando la abreviatura: 



OPEN 1.8.15 

PRINTtl, "& NOMBRE DEL FICHERO' 



Tras utilizar durante largo tiempo un disqueie, ocurre que, tras crear y bo- 
rrar muchos programas, dejar ficheros de datos sin cerrar (procure que esto no 



le ocurra muy a menudo), tendremos el disquele muy desorganizado, con mu- 
chos bloques sueltos sin utilizar v. aunque sean muchos, son poco utilizables. 



bien: 



OPEN 13,15. "V" 



OPEN. I.B.lñ. "VALIDATE' 



CLOSE 



AcOltÚmbfetC a utilizar esta instrucción después tic haber finalizado las ope- 
raciones a realizar tras el OPEN inicial. Sabré iod(t en ficheros de datos será 



un 



noy imponente. pues aniesde enviar los datos al disquete se van almacenando 
en cierta lurte de la memoria y, si no utiliza el comando ( M.OSK, se quedarán 
allí sin set enviados al fi< hero en que deseábamos que estuviesen. 



Ficheros de datos secuenclalee 

Muchas de las advertencias rn la forma de manejo de este tipo de fíchelos 
son similares l*""-' disquete y la I>atassctlc Así pues, seria una buena medida 
que releyera aquella sección ante», de proseguir Vamos a \er aquí las principa- 
les diferencias, y sobre todo usted comprobará la gran diferencia: la velocidad. 

Al igual que en la I>alassrtte. antes de poder utilizar un fichero de dalos 
tenemos que abrirlo (OPEN); el formato de la instrucción es: 



OPEN «i 



anal». "Q: nombre. SEQ. W 



n.f: Número del fichero, del 1 al 255 

n.d: Número del dispositivo, en caso de un solo dnve. el 8. 

canal: Para f.cheros de datos, del 2-14 (recuerde que el 0 y el 1 se 

reservan para LOAD y SAVE y que el 15 es el del canal de 

comandos) 

nombre: nombre que queramos ponerle al fichero 
SEQ: Indica que el fichero es secuencia!. 

W: Indica que lo abr.mos para escnb.r (WRITE). S. lo Queremos abrir 
para leer su contemdo tendremos que poner una R (READ) 



Por ejemplo: 



OPEN 4. 8, 3, "0: PRUEBA, SEQ. \V" 



Un fichero que va existe sólo lo podemos abrir para leerlo y no para escribir- 
lo. Si intentamos abrirlo para escribir obiendremos un error y la luz roja oc- 
la unidad de discos quedará parpadeando. Si queremos escribir en un fichero 
que ya existe podemos introducir el 



OPEN 4, 8, 3. "<&<): PRUEBA, SEQ, W" 



Pen. re» nerde que así borrará los datos que ya existían, pues escribirá sobre ellos. 

No es necesario que el nombre del fichero esté determinado en la instruc- 
ción de apertura. OPEN. Es decir, podemos utilizar una variable de cadena dentro 
de un programa y poner así diversos mimbres a los diferentes ficheros que cree- 
mos con ese programa. Para esto podrían valer las líneas: 

IWW INPUT "NOMBRE DEL FICHERO"; NFS 
1010 OPEN 3. 8, 5, "0:" + NF$ + \SEC¿, W" 

El resto de las sentencias para manejar ficheros de datos secuenciales, ya las 
\ muís i cm detenimiento al hablar de ficheros en Datassette, Ski los comandos: 
CLOSE. para cerrar el fichero; PRINTf, para enviar datos al fichero; INPUT* 
y GET#. para leer dalos de los ficheros. 

Acuérdese de cerrar (CLOSE) los ficheros después de haber terminado de 
utilizarlos, y sobre todo, si está escribiendo en ellos. Si no cierta el fichero per- 
derá todos los datos que estén esperando en la memoria del ordenador a ser trans- 
mitidos. 

Recuerde también que con un INPUT# no puede leer cadenas mayores de 
H0 caracteres; para cadenas mayores tendrá que utilizar el GETff, que lee carác- 
ter a carácter. 

Al igual que hacíamos cuando tramitábamos ron la IXitassette, es conveniente 
eompmoar el valor de la variable ST. ST es una variable del sistema t^uyo con " 
tenido depende del resultado de la última operación de lectura. Eos posibles va- 
lores que puede tomar, cuando utilizamos la unidad de discos, se muestran en 
la figura A. 7. 
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Vamos a ver ahora un ejercicio sencillo que nos permita repasar todo lo que 
hemos visto en esta sección. Sr trata de crear un fichero con los nombres de nues- 
tros amigos. El programa nos saluda (líneas 60-100) informándonos de lo que 
debemos de hacen para introducir un nombre, lo tecleamos ( liando nos lo pida 
v pulsamos la tecla RETURN. Si ya no deseamos introducir más nombres, pul- 
samos la tecla X v después RETURN. En la línea 50 se abre un fichero de da- 
tos con el nombre de -NOMBRES 1-, v la línea 160 se encarga de escribir en 
él. uno tras otro, los nombres «pie pongamos. Observe que la luz i 



dad de discos no se enciende iras cada nombre. Sólo se enciende si ya llevamos 
muchos nombres, o si se ejecuta la línea I8fl pues los nombres se van guardan- 
do en una zona de memoria, v cuando ésia se llena se transmiten lodos ¡untos 
a una gran velocidad. Si no llegamos a llenarla, o si al final quedan algunos 
nombres más, la sentencia GLOSE se encarga de terminar de escribir estos da- 
mi en el fichero v de cerrarlo adecuadamente. 

10 pem«***+********** «♦♦♦♦♦*♦♦ 

20 REM#CREflCIOH DE UN FICHERO* 
30 REM**##**###**#************ 
40 PRINT'TJ" 

50 OPEN 2,8* 4, M 0 '• NOMBRES!* SECM4" 

60 PRINT:PRINT:PPINT TflEK 16) ; "NOMBRES" 

65 PRINT 

70 PRINV'ESTE PROGRAMA ALMACENA NOMBRES" 
80 PRINT ¡ PPINT"EN EL DISKETTE. POR FAVOR" 
90 PRINT: PRINT "ESCRIBA CADA NOMBRE CUANDO " 
100 PRINT:PRINT"SE LE PIDA." 

110 PRINT ! PRINT" INTRODUZCA LA X PARA TERMINAR " 

120 FOR 1-1 TO 5000 NEXT 

130 PRINT "73" 

140 I NPUT " NOMBRE " ; N$ 

150 IF N$»"X" THEN 180 

160 PRINT#2<N$ 

170 GOTO 130 

180 CLOSE 2 

190 REM*#*********#*#************** 

200 REM*LECTURA DEL FICHERO CREADO* 
210 REM***#*#*#i 
220 PRINT "73" 
230 PRINT ; PRINT : PRINT 

240 PRINT"SI DESEA LEER EL FICHERO CREADO 1 
250 PRINT :PRINT"PULSE LA LETRA L" 
260 GET A$:IF A$<>"L" THEN 260 
270 PRINT'TJ" 

280 OPEN 4>8,4,"0:NOMBRES1.SEO.P" 

290 INPUT#4,J$ 

300 PRINT J« 

310 IF ST-64 THEN 330 

328 00T0 290 

330 CLOSE 4 

340 PRINT : PRINT : PRINT TOBOS)/ "SE ACABO" 

Después, las líneas 240-250 nos indican que, si desearnos ver el fichero, pul- 
semos la letra L. Si así lo hace, la línea 290 se encarga de leer los nombres guar- 
dados en el fichero y la línea 300 de imprimirlos en la pantalla, hasta que se 
delecte, mediante S l\ que hemos llegado al final del fichero. 

Anímese y cree un fichero con los nombres, direcciones y teléfonos de sus 
amigos. 



La impresora 



Para conectaría tenemos que utilizar el mismo enchufe, conexión en serie, 
que i>ara la unidad de discos. Si ya tiene conectada la unidad de discos, observe 
que en la |>arte posterior de esta última existen dos coneclorrs en serie idénti- 
cos. Uno de ellos estará ocupado por la conexión entre la unidad de discos y 
el C-64. Utilice el otro para introducir la clavija de la impresora. 

La impresión en papel, o el envío de datos para que se escriban en el papel, 
se trata como si fuera un fichero de datos al que hemos de dirigir éstos. Así, 
tendremos que abrir un fichero mediante la intrueción: 



OPEN «n.U, -n.d... «canal» 



n.f: Número del fichero, del 0 al 225. 

n.d Número del dispositivo En el caso de la impresora podemos utilizar 
el 4 ó el 5 Este número se selecciona utilizando el interruptor T-4-5 
que hay en la parte posterior de la impresora. 

Canal En general no se utiliza Sólo se emplea para indicar que 
queremos que escriba en «Modalidad minúsculas» en lugar de 
«Modalidad mayúsculas». En caso de que deseemos esto tendremos 
que poner un 7. 



Por ejemplo, para escribir «lista es mi impresora*, introduzca los comandos. 
OPEN 1,4 

PRINTn "ESTA ES MI IMPRESORA" 

Siempre debemos recordar que tras utilizar un fichero hemos ríe cerrarlo. 
En el ejemplo anterior utilizaríamos el comando: 

CLOSE I 

La estructura general de la sentencia CLOSE es: 



CLOSE -numen) del fichero» 



Todo lo que generalmente vemos aparecer en la pantalla lo podemos enviar 
a la impresora. Para ello tenemos que utilizar la instrucción CMD. Introduzca 
las líneas: 

OPEN 5.4 
CMD 5 

Y observará que todo lo que normalmente aparecería en la pantalla sale ahora 
por la impresora. Incluso los mensajes de error y el mensaje READY 

Para salir de esta situación tenemos varias opciones. La primera es pulsar 
con decisión v al mismo tiempo las teclas RUN/STOP v RESTORE. La se- 



gunda es volver a utilizar la instrucción CMD para díreccionar de nuevo la sali- 
da a la pantalla; CMD 3, pues 3 es el número de dispositivo correspondiente 
a la pantalla. Y la tercera es poner un PRINT#«n.f» vacío que imprimirá un 
retorno de carro y liberara a la impresora (en el ejemplo anterior PklNTf 5). 

Cuando utilice la impresora recuerde: 

aj Que la acción del separador «;», en los PRINT#, es la misma que 
cuando utiliza la pantalla. Esto es, se escribe cada dato a continuación 
del otro. (Las variables numéricas van precedidas de un espacio en 
blanco.) 

b) Sin embargo, la acción del separador «,» varía un poco, pues su efecto 
es colocar once espacios en blanco entre cada par de datos. 

C) Las acciones de las funciones TAB y SPC son idénticas y coinciden con 
el efecto del SPC en la pantalla. Sin embargo, no pueden ir directa- 
mente detrás del PRI\T# «it.fi», sino que hemos de separarlos, aunque 
sea mediante una cadena vacia, así. por ejemplo: 

OPEN 3, i 

PRINT#3, "SPC (7)"; "HOLA" 
CLOSE 3 



Apéndice B: Lista de comandos 



CLOSE 

CLOSE se utiliza para cerrar los ficheros abiertos previamente con coman- 
dos OPEN. Cada fichero debe cerrarse antes de la terminación del programa 
para garantizar su integridad. No puede usarse con un número de fichero para 
el que no se ha ejecutado un OPEN. 

Samxm 

GLOSE nf 
Siendo nf el número del fichero. 

Ejemplo 

GLOSE r > 

Cierra el fichero número 5 

CLR 

CLR es la abreviatura de OLEAR, que significa borrar, se utilizará para 
poner a cero todas las variables numéricas y asignar rontenido nulo a las 
alfanuméricas sin afectar al programa. Cierra todos los ficheros que estén 
abiertos. 

Somxa 

CI.R 



I» CLR 

CMD 

CMD se utiliza para enviar a un periférico distinto de la pantalla la infor- 
mación que normalmente sale a esta, por ejemplo, con PRINT o LIST. 

Sarnuas 



CMD nf 
Siendo nf el número de fichero 



90OPEN 1.4 
HWCMD I 

Con la linca 100 dirigimos la información de salida al fichero número I, pre- 
viamente asociado al periférico número 4. que es la impresora (línea 90). 

CONT 

CONT lecleado como comando directo continúa la ejecución de un progra- 
ma detenido cotí S'IX )P o END en el mismo tugaren que se encontraba cuando 
se produjo la interrupción, siempre y cuando no se haya modificado en nada 
el programa, ni añadido líneas nuevas, ni lan siquiera sr haya pulsado RETURN 
para cambiar el cursor a otra línea 

Sintaxis 

CONT 



DATA 

Con DATA guardamos datos numéricos o alfanuméricos separados por co- 
mas, que serán asignados a variables al leerlos con instrucciones READ. 

SlNIAXIS 

DATA constante [constante, constante ...consianie| 

Ejemplo 

30 DATA ESTER, ALFREDO 

40 DATA 15. Ih\ 6J>, HILAR 

SU DATA 19. M -I. ENRIQUE. 6. LUIS 

DEFFN 

DEF FN nos permite trabajar con funciones definidas por el usuario Con 
seguimos así ahorrar memoria cuando una fórmula debe usarse varias veces a 
lo "largo de un programa. No puede usarse como comando diicrlo. 

Snmxa 

DEF FN NI' (argumento) = «expresión- 
Siendo NI el nombre de la función. 

Ejemplo 

10 DEF FN B(Y) = 74-(:i4.75T'¿-Y/3) 
20 PRINT FN B(4) 



DIM 

DIM se utiliza para reservar m<-moría para variables con índices. No es ne- 
cesario si se trabaja con índices menores de 11. Cada variable sólo puede dimen- 
sionarse una vez en el programa, salvo que se use CLR. 

DIM NOMBRE DE VARIABLE (argumento numérico) 

tmm 

1(4 DIM A (5) 

20 DIM Al (44, 3) 

END 

Cuando un programa encuentra una insirui < mn F.ND detiene su ejecución, 
lo i nal permite que tenga mas de una (Habilidad ili finali/a< ¡ón distinta que 
el fin físico del programa. U ejecución puede reanudarse ron CON T. 

S/STAXtS 

END 

Ejemplo 

¿m END 

hVR-m-NEXT 

Las instmrionr* FOR TO y NEXT permiten repetir una serie de acciones 
las vwes deseadas. 

Stsuxis 

FOR -NOMBRE DE VARIABLE» - Vi TO Vf STEP «INCREMENTO» 

instruciones a repetir. 

NEXT -NOMBRE DE VARIABLE» 

Siendo Vi = valor inicial 
YT= valor final 

Es opcional poner o no el nombre de la variable a continuación del NEXT. 
'lámparo es imprescindible STEP, ya que el BASIC asume incremento 1 por 
delecta 

Ejemplo 

10 FOR I = 1 TO 15 
20 PRINT "PACO" 
30 NEXT I 




GET 

GET nos permite introducir un carácter numérico o alfanumérico desde el 
teclado, pero, a diferencia de INPUT, no hay que pulsar RETL'RN, con sólo 
pulsar el carácter, este es recibido. Mientras no se pulse ningún carácter devol- 
verá Ho la cadena vacía, dependiendo de que el nombre de variable que le acom- 
pañe sea numérico o alfanumérico. Si se utiliza un nombre de variable numérico 
se pulsa cualquier tecla que no sea un dígito aparecerá el mensaje SYN3AX 



Sintaxis 

GET NOMBRK DF. VARIABLE I. NOMBRE DE VARIABLE.. . NOMBRE 

DE VARIARLE) 



mClZT BS: 1F BS- THEN \W 

Con esta línea de programa conseguimos que el programa esté detenido basta 
que pulsemos una tecla. 

GETn 

GET* se utiliza después de haber abierto un fichero con la instrucción OPEN, 
para permitir la entrada de i aracleies <le uno en uno en forma similar a como 

Funciona GET para el teclado. 

Sintaxis 

gf.t# nf, nombre de variarle i. nombre de variable ... nomb 

de varia ble| 

Siendo nf el número de fichero 

GOSUB 

La instrucción GOSUB envía el control del programa a la línea que se espe- 
cifique a continuación y sigue ejecutando desde ella basta que encuentre una 
instrucción RETURN. El programa retrocede entonces hasta la sentencia si- 
guiente a la que contenía el GOSUB Se utiliza cuando hay que hacer uso de 
una misma rutina en diferentes partes del programa. 

Sistnxts 

GOSUB NUMERO DE LINEA 



101 GOSUB 1000 

Esta línea ordena ejecutar la subrutina que comienza en la linca 1000 



GOTO 

La instrucción GOTO envía el control del programa a la linca que se especi- 
fique a continuación y sigue la ejecución a partir de ella. 

SlKTAXIS 

DE LINEA 



MGátóm 

La instrucción GOID envía el control a la línea 250 
!F THEN 

IF...THEN permite tomar decisiones acerca de una situación. Si la condi- 
íón entre el IF y el THEN es cuna, se ejecuta la acción indicada a continua- 
ión del THEN; si no lo es. no se ejecuta y el control pasa a la línea siguiente. 
La condición puede ser compuesta si K utilizan los operadores lógicos AND. 
>R v NOT. 



SrsTAxrs 

Ejemplo 



11 .CONDICION" THEN «ACCION- 



Irtl Ir A < B THEN PR1NT "CIERTO" 
300 IF X> Y AND Y> Z THEN C - C + I 

INPUT 

La instrucción INPUT permite introducir datos numéricos o alfanuméri- 
os desde el teclado, según el tipo de las variables que le acompañan. Si se pone 
un mensaje, este debe ir separado del primer nombre de la variable mediante 
un punto y coma, y a continuación, separados por comas, pueden ponerse más 
nombres de variables. 



INPUT -MENSAJE-: VARIABLE \, VARIABLE VARIABLE] 

El mensaje es opcional 

Ejemplo 

10 INPUT "SU NOMBRE"; AS 

20 INPUT "INTRODUZCA 3 NUMEROS ENTEROS"; A%. B%, C 
30 INPUT A. B 




Sintaxis 



INPUT* nf. VARIABLE [, VARIABLE,..., VARIABLE) 
Siendo nf el número de fichero 



u»iNPirr#9, a 

•m INPUTl 5, C$. H 

LET 

Leí es la sentencia de asignación y se utiliza para asignar contenidos a va- 
riables, tanto numéricas como al fanu mélicas. La palabra LET es opcional y nor- 
malmente se- omite. 

SlSTAXIS 

LET «NOMBRE DE VARIABLE- - «EXPRESION- 

Ejmpb 

10 LET A -6 

50 LET A$ - "CASA 4" 

90 A% - 56 

UST 

Con la instrucción LIST conseguimos lisiar el programa que esté actual- 
mente en la memoria del ordenador. 

SINTAXIS 

LIST 

LIST NUMERO DE LINEA 
LIST —NUMERO DE LINEA— 
LIST NUMERO DE LINEA— 

LIST NUMERO DE LINEA — NUMERO DE LINEA 

Ejemplo 

LIST (¡0 
LIST 80 

LOAD 

La instrucción LOAD sirve j>ara cargar un programa desde un dispositivo 
a la memoria del ordenador. 

SlNWXIS 

LOAD ["NOMBRE" (. NUMERO DE DISPOSITIVOJ] 
Si se omite el número de dispositivo se carga el programa desde el Dataseite. 



Ejemplo 



LOAD 

(iarga el primer programaf que se encuentre en la cassette 

LOAD "PROG. 1" 8 
Carga del disco el programa llamado PROG. 1 

NEW 

El comando NEVV borra el programa que el ordenador tenga en ese mo- 
mento en memoria. lódas las variables numéricas se iniciaÜ7an a 0 y las alfami* 
méricas a cadena nula o vat ía. Si: utiliza como comando directo, pero introducido 
en una línea de programa su efecto es el mismo, borra el programa al llegar 
la ejecución a la línea que contiene el NEVV. 



Sintaxis 

NEW 

ON-GOSUB 

ON debe ir seguido de una lóimula que al evaluarse genera un número, 
y GOSl'B lleva a continuación una lisia de números de línea separados por co- 
mas. Si al evaluar la fórmula el resultado es I, se ejecuta la rutina que comienza 
en el primer número de la lista; si es 2. la segunda, y así sucesivamente. Si es 
0 o iu.mil uue el número de líneas que hay detrás el control, pasa a la línea 
siguiente a la que contiene el ON-GUSUB. 

SINTAXIS 

UN -expresión-. GOSUB NUMERO DE LINEA [. NUMERO DE LI- 
NEA NUMERO DE LINEA] 

Ejemplo 

10 INPUT A 

20 ON A GOSUB 100 70 90 



ON-CATTO 

Funciona exactamente igual que ON-GOSUB. con la diferencia de que no 
hay posibilidad de retorno de subruiina. 

Sintaxis 

ON -.expresión.- GOIO mimen» de línea | . número de línea número de linea) 

Ejemplo 

10 INPUT A 

20 ON A GOTO 100 . 70 . 90 



OPEN 



OPEN permite acceder a periféricos lales como la impresora, la unidad de 
dlSCOS, el t.assriic. Debe ir seguida del número de fichero, que debe estar com- 
prendido emre 0 > 225; de otro más que indica el número de dispositivos, que 
será 0 para la pantalla, 1 para la cassette. 4 para la impresora > B para la unidad 
de disco. Separado por coma puede ir un tercer número, que indica para qué 
liemos abierto el fichero; los valores que puede tomar dependerán del dispositi- 
vo; este número es opcional. Y, por último, también de forma opcional y sepa- 
rado por coma, podemos poner el nombre del fichero. 

Sintaxis 



OPEN nf. nd [. d«, [f$H 

Siendo: ni* Número de fichero. 

mi Número de disposilivo. 

lica para que abrimos el fichero. 



POKE 

El comando POKE se utiliza para colocar datos en posiciones concretas de 
la memoria. Va seguido de dos números o expresiones: el primero indica la po- 
sición de la memoria y debe estar comprendido entre 0 y 65535. y el segundo 
indica lo que introducirá en la posición de memoria especificada y debe estar 
comprendido entra 0 y 255. 

Sintaxis 

POKE n„ n 2 

Siendo: n, Número que indica la posición de la memoria. 

n 2 Número que indica lo que ha de colorarse en dicha posición. 

Ejemplo 

10 POKE 36888.8 



PRINT 

PRINT a la Sentencia qtlC se uiili/a para imprimir en la |>an talla números 
o cadenas. Utilizando los separadores punto y coma, y coma conseguimos con 
un solo PRINT imprimir varios datos. 

Sintaxis 

print -lisia de impresion» 

Ejemplo 

10 PRINT "HOLA". "PEPE" 

20 PRINT 2*6T*/2+J 

30 PRINT "AREA «": 12 



PRiNT» 

PRINTf se utiliza para grabar en el fichero, cuyo número se indica a conti- 
nuación, los dalos que. separados por comas, se indiquen, ya sean números, ca- 
denas o nombres de variables. 

Sintaxis 



PRINT* nf. «LISTA» 
Donde nf es el número del fichero. 

Ejanplo 

100 PRINT* 4. B. C$, "MAÑANA" 
Esta línea graba en el fichero 4 el valor de B. el de C$ y la cadena «MAÑANA» 

READ 

READ asigna los datos contenidos en sentencias DATA a las variables que, 
separadas por comas, le acompañan. 

Sintaxis 

READ NOMBRE DE VARIABLE [. NOMBRE DE VARIABLE NOM- 
BRE DE VARIABLE} 

Ejmpb 

10 DATA I. 6, '-». 10 3.3 

20 READ A, B. C, D. E 
100 READ CS. ES. H, F 
120 DATA RUBIA. MORENA, 65 
130 DATA -05 



REM 



REM permite introducir comentarios en un programa. Las instrucciones 
REM n«) afectan a la cjeemión del programa. Puede ir seguida de 
grupo de caracteres sin necesidad de utilizar comillas, pero ev 
gráficos. 

Somas 

REM «Comentario» 



10 REM AREA DE UN CONO 

500 REM SUBRUTINA DE ACTUALIZACION 

RVN 

El comando RUN consigue la ejecución del programa que se encuentre en 



la memoria del ordenador. Tecleando RUN la ejecución del programa se pro- 
duce desde la primera linea que exista; si a continuación se teclea un número 
de línea, la ejecución comenzará a partir de dicha línea. 

Sttmx/s 

RUN | NUMERO DE LINEA) 

Ejemplo 

RUN- 
RUN 2Ü 

SAVE 

SAVE es el comando utilizado para graUir un programa, existente en la me- 
moria del ordenador, en cima o disquetc. 

Sintaxis 

SAVE "NOMBRE DEL PROGRAMA" para cima 
SAVE "NOMBRE DEL PROGRAMA". 8 jura disquetc 

Ejemplo 

SAVE "l'ROG. 15" 
SAVE PROG. 6.7* 8 
SAVE 

SÍÚÉ 

El comalido S'IX)P puede incorporarse a un programa para detenerlo en al- 
quil pimío dislinio del final lisien, pero produce el mensaje BREAK ERROR 
1N CINE «Núm. de línea». La ejecución puede reanudarse con CONT. 

Sintaxis 

STOP 

Ejemplo 

IWSIOP 

200 IF A>B THEN STOP 

VER i F Y 

El comando VERIFY se utiliza para comprobar si el programa que acaba- 
rnos de grabar en una cinta o disquete coincide con el que está actualmente en 
memoria. La finalidad es asegurarnos de que el programa se ha grabado correc- 
tamente. 



Sintaxis 



VERIFY "NOMBRE DEL PROGRAMA" [jara cassette 
VERIFY "NOMBRE DEL PROGRAMA". 8 para disquete 

WAIT 

WAIT sirve para suspender la ejecución de un programa hasta que el conte- 
nido de una posición de memoria tome un valor determinado. 

Sintaxis 

WAIT ni. n2 [. n3) 

Donde: ni Número que indica la posición de la memoria a examinar. 
n2 Operando para AND. 

n3 Operando para OR exclusivo (es opcional). 
n2 y n3 Deben estar comprendidos entre 0 y 225. 

Funciona de la siguiente manera: se extrae el contenido de la dirección de 
memoria ni v se le aplica la operación lógica OR exclusiva; con n3 se ha especi- 
ficado este parámetro. Al resultado, o en su caso al valor original, se te aplica 
a continuación la operación lógica AND con n2. Si el resultado es cero se repi- 
ten las mismas operaciones, y en otro caso se ejecuta la sentencia siguiente. 

Ejemplo 

W POKE lf>2. 76 
20 POKE 161, 0 
30 WAIT 161, 1 
Estas tres líneas producen una espera de tres segundos. 



ABS 

ABS devuelve el valor absoluto del número que se le proporciona como ar- 
gumenta 

Sintaxis 

ABS (argumento numérico) 

Ejemplo 

PRINT ABS (5) Imprimirá 5. 
PRINT ABS (—6) Imprimirá 6. 

ASC 

ASC devuelve el código ASCII del primer carácter de la cadena usada como 
un argumenta 



Siniaxis 

ASC (argumento alfanumérico) 

Ejemplo 

PRINT ASC («A») Imprimirá 65. 

PRINT ASC («ANA») Imprimirá 65. ya que utiliza como argumento 

sólo el primer carácter de la cadena. 

ATN 

ATN devuelve el arcotangente expresado en radianes del argumento que se 
le proporcione. 

SINTAXIS 

ATN (argumento numérico) 



PRINT ATN (-7) Imprimirá -1.4288927 

CHRS 

CHRI es la función inversa de ASC. Devuelve el carácter correspondiente 
al iridien ASCII que le introduzcamos. El argumento debe estar comprendido 
entre 0 y 225. 

Sintaxis 

CHRS (argumento numérico) 

Ejemplo 

PRINT CHRS (65) Devuelve el carácter A. 

eos 

COS devuelve el coseno del argumento numérico que le proporcionemos 
(el argumento hay que expresarlo en radianes). 



COS (argumento numérico) 
PRINT COS (30) Imprimirá .154251445 

EXP 

EXP devuelve el valor de la constante e (2.71828183) elevado al número que 



se le dé como argumento, dicho número debe estar comprendido en el intervalo 
* 88.029691] sobrepasar por arriba el rango proporcionaría el mensaje O VER 
FLOW £RROR y por debajo imprimiría 0 

Sintaxis 

EXP (argumento numérico) 

Ejmpl* 

PRINT EXP (2) Imprimirá 7.3890561. 

PRINT EXP (99.654321) Imprimirá OVERFLOW ERROR. 

PRINT EXP (-89.039998) Imprimirá 0 

FRE 

ERE devuelve el numen) dr bytes disponibles en la memoria, su argumento 
es simbólico y, por tanto, puede ser un número o una cadena. Es frecuente uti- 
lizarlo como comando directa 

SlNIAXIS 

FRE (argumento) 

Ejemplo 

Si nada más conectar el ordenador teclease PRINT FRE (2) obtendría 
-26627, pero el mismo valor conseguiría si teclease PRINT IRE (4) o PRINT 
FRE (A). 

ÍNT 

INT devuelve la parte entera del número que se le dé como argumento. ¡Re- 
cuerde que el número que imprime es el entero menor! 



Snmxa 



Ejemplo 



LEFTS 



INT (argumento numérico) 

PRINT INT (6.5) Imprimirá 6. 
PRINT INT (-2.5) Imprimirá -3. 



LEPIS extrae el número de caracteres que se le indiquen de la parle 
izquierda de la cadena que se le proporcione como argumento. 



LEFTS (argumento aljanumériea, número) 



PRINT LEFTS ("izquierda", 2) Imprimirá iz. 

LEN devuelve d número de caracteres que contiene la cadena que se le da 
corno argumento. 



S/ífwas 



I.EN (argumento alfanumerico) 



PRINT LEN ("HOLA") Imprimirá 4. 
PRINT LEN (" HOLA") Imprimirá 6. 



LOG 



LOG devuelve el logarit mo en base e del argumento numérico que se le pro- 
porcione mientnu éste no sea ni cero ni negativo, ya que entonces presentaría 
el mensaje ILLEGAL QUANTITY ERROR. Recuerde que si desea calcular 
un logaritmo en base decimal lo puede conseguir mediante LOG(X)/LOG(10), 
donde X es el número cuyo logaritmo decimal desea calcular. 

Sintaxis 

LOG (argumento numérico) 



PRINT LOG (10) Imprimirá 2.3tt2585«9. 

MIDI 

MID| extrae n caracteres (n es un número a especificar como argumento) 
de la cadena indicada. También tenemos que concretar el carácter por el que 
ha de comenzar la extracción. 



Sintaxis 



MIDS (argumento alfanumérico, m, n) 

m Número del carácter en el que comienza la extracción. 

n Número de caracteres a extraer. 



PRINT MID$ ("CADENA", 2, 3) Imprimirá ADE. 

PEEK 

PKKK devuelve el contenido de una posición decerminada de la memoria. 



Sintaxis 

PEEK (dirección de memoria) 

Ejemplo 

PRINT PEEK (I) Imprimirá 55. 

POS 

POS devuelve el número de columna en que se encuentra el cursor en la 
pantalla, su argumento es simbólico y, por tanto, puede ser numérico o alfanu- 
mérico. 

SlNlAXIS 

POS (argumento) 

Ejemplo 

PRINT POS (5) Imprimirá tt 

PRINT "HOLA"; POS (5) Imprimirá HOLA 4. 

RIGHT$ 

RIGHTS extrae de una cadena, por ejemplo A$. el número de caracteres 
que le indiquemos, comenzando |n>r la derecha. 

SlNTAXTS 

RIGIITS (argumento alfanumérico. número) 

Ejemplo 

PRINT RIGHTS ("HOLA". 2) Imprimirá "HOLA". 

RND 

RND genera números aleatorios comprendidos entre 0y I, tiene argumen- 
to numérico positivo. Si en una línea anterior asignamos a una variable RND 
(-argumento) conseguimos obtener siempre lus mismos números. 



RND (argumento) 
RND (-argumento) 



10 X- RND ( — I) 
20 POR I-1TO3 
30 PRINT RND (1) 
40 NEXT I 



Siempre que lo ejecutemos obtendremos la misma secuencia: 

—32878082 

—978964086 

—895758909 

SGN 

SGN devuelve 1 1 cuando c) número que se le da como argumento es positi- 
vo, —1 si es negativo y 0 ti es cero. 



Sintaxu 



Ejemplo 



SGN (argumento numérico) 



PRINT SGN (—8) Imprimirá -I. 
PRINT SGN (0) Imprimirá» 
PRINT SON (76) Imprimirá L 

sm 

SIN devuelve el valor del seno del número que se le proporcione como ar- 
gumento (el argumento ha de expresarse en radianes). 

Sintaxis 

SIN (argumento numérico) 



PRINT SIN (45) Imprimirá .80903524 

src 

SPC desplaza el cursor a la derecha el número de espacios que se indique. 
El texto no es modificado por el cursor. 

Sintaxis 

SPC (argumento numérico) 

Ejemplo 

PRINT SPC (10); "HOLA" Empezara a imprimir HOLA 

en la columna 10 

PRINT "HOLA"; SPC (7); "HOLA" Imprimirá HOLA, dejará siete 

espacios en blanco y volverá a 
imprimir HOLA. 



SQR 



SQR devuelve la raíz cuadrada del número positivo que se le dé como argu- 
mento. Si le proporcionamos un número negativo presentara el mensaje ? ILLE- 
GAL QUANTITY ERROR. 

A7.VM.VK 

SQR (argumento numérico) 

^templo 

PRINT SQR (9) Imprimirá 3 
PRINT SQR (26) Imprimirá 5.09901951. 

PRINT SQR (-!) Imprimirá ? ILLKGAL QUANTITY ERROR, 
ST 

El valor de esta \aiiable depende del resultado de la última operación de 
entrada/salida (ver la sección de ficheros de datos en Datasseite y el apéndice 
de «Otro* periféricos-). Es aconsejable comprobar su valor después de ejecutar 
cualquier sentencia que milite los |M-riíériros. 

SlXfAXtS 

ST 

Ejmpi, 

120 IF ST - 64 THEN PRINT "FIN DE FICHERO" 

STRS 

STRS convierte en cadena el argumento numérico que se proporcione. 

Sttmxa 

STRS (argumento numérico) 

mm 

10 LET AS ~ STRS (19.8) 
20 PRINT AS 

S¥$ 

SYS es una función del sistema que transfiere el control del programa a un 
subsistema independiente, su argumento debe ser un número decimal o una 
variable numérica cuyos rangos estén comprendidos enlre W y 65535. Consegui- 
mos COR ella ejecutar d programa en lenguaje máquina a pan ir de la posición 



fyNiAXJS 



SYS (direcc ión de memoria) 



TAB 

TAB mueve el cursor hasta el número de columna que se especifique como 

argumenta 

TAB (argumenta numérico) 

Ejmptn 

PRINT "HOLA"; TAB (7); "HOLA" Imprimirá HOLA y la columna 

número 8 volverá a imprimir 
HOLA 

TAN 

TAN devuelve la langenie del argumento numérico (expresado en radianc-s) 
que se le proporcione. 



SlSIAUS 
Ejempfo 

ti. m 



TAN (argumento numérico) 
PRINT TAN CM) Imptimirá •> HVS nWM. 



I y TI$ soti variaoics del sistema y están relacionadas con el reloj de tiem 
)/u i« .il que lleva incorporado el 064. TI loma el valor 0 al encender el ordena- 
dor y mi valor va aumentando con el tiempo que esté encendido, sólo puede 
volver a 0 cambiando el valor de 11$. TU es una cadena que consta de seís 
caracteres numéricos, los dos primeros, representan el número de horas, los dos 
Siguientes el de minutos y los dos últimos el de segundos. Se le puede dar cual- 
quier valor, siempre que los caracteres sean números, y quedará activado a par- 
tir de ese momento. 



Sírmxis 



Ejemplo 



10 INPUT "CUANTOS VALORES DE TI DESEA 
OBTENER": T 
20 FOR Ul TO T 
30 PRINT TI 
4tí N EXT I 



M$ = "112«i5" Ajusta el relújalas II horas 20 minutos 35 

segundos (de la mañana). 



US» 

Es una función del sistema cuya misión es pasar un parámetro a una subru- 
tina en lenguaje de máquina. 

Sis tajos 

L'SR (argumento) 

VAL 

VAL devuelve el equivalente numérico de la cadena que se le proporcione 
argumento, sólo si la cadena con nene números. 



SomXa 

VAL (argumento alfamiméiico) 

Ejmpt* 

PRINT VAL i"123" Imprimirá 123. 

10 AS-"45b" 

20 PRINT VAL (ASl-2 Imprimirá 912. 

PRINT VAL ("1A3") Imprimirá 1. 

PRINT VAL ("CHF") Imprimirá 0 



ABREVIATURA DE LAS PALABRAS CLAVE DEL BASIC 

Muchas de las palabras i la\r pueden abreviarse > esto nos ahorra tiempo 
cuando introducimos un programa en el ordenador. Si escribimos así nuestro 
programa, en apariencia sera ilegible, lleno de caracteres extraños, pero al lis- 
iarlo cada abreviatura se convierte en la palabra BASIC correspondiente. Por 
ejemplo, la abreviatura del PRINT es •?». Así. si ledra el siguiente programa: 

10 "ABREVIATURA" 

y lo lista, observará: 

10 PRINT "ABREVIATURA" 

El resto de las abreviaturas se consiguen tecleando la primera o dos prime- 
ras letras de la palabra clave y a continuación, manteniendo pulsada la tecla 
SHIFT. pulsando la tecla correspondiente a la segunda o tercera letra de dicha 
palabra clave. 

Por ejemplo, jiara conseguir abreviada la palabra (¡LOSE teclearemos CL 
y manteniendo pulsada la tecla StttFT pulsamos la tecla de la letra O. y para 
conseguir abreviar la palabra clave FOR. teclearemos F y. n 
da la tecla SI UET, pulsaremos la tecla .le la letra P 



tainos todas las posibles abreviaturas que puede conseguir con los símbolos que 
les corresponden. En la columna «Forma de abreviarlas-, la letra situada dentro 
del recuadro indica que hay que mantener pulsada la tecla SHIFT al mismo 
tiempo: 



Palabra dtr. f 


Forma de abreviarla 


.Sim/w/o 


ABS 


AE 


& 1 
\ 1 


AND 


AET 


A/ 


ASC 


A Te* - ! 

AE 




ATN 


AT] 


A 1 


C:i IRS 


/ ■ i i 

OH 


C 1 


CLONE 


r < t ¡ — 

CLEÜ 


cu 


CLR 


CE 




CMU 


CBS 




CON 1 




nf™ 


DATA 


1 >. 




DEF 


DF.1 




DIM 


1 A |T — 1 

DE 


1 n 

1J*1 


END 


BB 


v / 


EXr 


EFl 


* 


POR 


1 f 


ti 


FR K 


m 
rt 


l; 

* 


( íB I 


(t 1 


K ' . 


COSLFJ 


GOE 


i 'i )/V 


(.< l|T ) 


rr 

uf" 




i > iflf ¥*f u 

IM'U r# 




i / 

1 ' 


III 




1 

1. — 


LEFTS 


LEE 


I.r, — 


LIST 


lfi 


Lt 


LOAD 


i 


1.1 


M 1 Df 


* f rr ■ 


\ K 

\n 


M.XT 




v 

-> — 


% • é Vf 

NOl 


N ÜJ 


v r~ 
ni 


OPEN 


O" i 


OI 


PEEK 


t. - 

P. 


r* — 


Pü K E 




pr~ 
ri 


PRINT 


i 

r 


r 


PRINT* 


PE 


n 
H— 


REAL) 


K 


K — 


RESTORE 


RED 


Rr. ▼ 


RETURN 


RErn 


REI 


11 !(*■■ I ITI 


K i— 




RND 


RE 


R/ 


RLN 


RE 




SAVÉ 


SH 


s* 


SGN 


SEJ 


SI 


Sin 




s-. 


SPC( 


SU 


sr 



fírcm de abreviarla 



SQR 

STEP 

STOP 

STRS 

SYS 

TAB< 

THEN 

USR 

VAL 

VER1FY 

wait 



SE 
STH) 



TE 
ÜE 





Las abreviaturas de las palabras clave IAB y SPC incluyen el paréntesis de 
apertura, es decir teclear St8)ci CquivafelUC .t SPC (8). \ ieeleai T-yH) equi- 
vale a TAB (8) 

La forma de abreviar descrita es la más practica, pero, en general, se puede 
abreviar una palabra clave tecleando sus primen 
manteniendo pulsada la tecla SHIFT pulsando i 
en el taso de PRINT 

Por ejemplo: 

— Puede .ibit \ ta i la palabra cKne (.¡LOSE de la forma descrita o tecleando 
CLO y. manteniendo pulsada la tecla SHIFT, pulsando la letra S. 

— FOR sólo puede abreviarse de la forma descrita. 



Apéndice C: Mensajes de error 



Cuando el C¡-(i4 fíncela un error, nos muestra un mensaje con el que nos 
Comunica d upo de error y. en c! raso de que se trate de un programa, el núme- 
ro de línea en la que se ha producido el mismo. 

Kl aspecto del mensaje es: 



$ «mensaje» ERROR IN UNE -numero de línea- 



Obtener un mensaje de error al ejecutar un programa no quiere decir que 
ése sea el único error que contiene el programa, sino que la ejecución se detiene 
al encontrar el primen». Si lo corregimos y volvemos a realizar la ejecución pue- 
de que transcurra normalmente o que vuelva a prcseni.ii un nuevo mensaje de 
error. 

A continuación le mostrarnos una lista completa de los mensajes de error 
que puede generar d BASIC del C-64, así como la descripción de sus posibles 
causas, pero tenga siempre en cuenta que hay un tipo de error que el ordena- 
dor nunca detecta: «los errores de lógica». >Jo debe pensar que por el hecho 
de que un programa presente resultados, este cumple su cometido, debe some- 
terle a una sesión exhaustiva «le pruebas en las que se le haga trabajar con todos 
los tipos íle datos posibles para los que está previsto que del» funcionar 



LISTA DE MENSAJES DE ERROR EN ORDEN ALFABETICO 

liAD SUBSCRIPT (Indice mcorrecio) 

Se produce cuando el programa hace referencia a un elemento de una ma- 
triz cuyo índice es mayor del especificado en la instrucción DIM. Obtendrá, 

ÍK>r ejemplo, este error si dimensiona una variable DIM A$ (50) c intenta tra- 
tajar luego con el elemento A$(51). también se producirá este mensaje cuando 
no se ha hecho dimensión previa [>ara una variable y se intenta trabajar con 
un índice mayor a 10 

BREAK (Rotura) 

El mensaje BREAK ERROR se produce al pulsar la tecla RUN/STOP cuan- 
do se está realizando un acceso a la cinta. 



CAN'T'cONTINUE (No M puede continuar) 

El comando CONT sólo puede usarse para continuar un programa después 
de haber pulsado la tecla RUN/STOP o de haberse ejecutado la sentencia STOP 
o la END y sólo sí no se ha modificado en nada el programa. Si se modifica 
el programa después de la interrupción aparecerá este mensaje de error, así co- 
mo si se utiliza CONT antes de empezar la ejecución de un programa con RUN. 

DEVICE NOI' PRESE NT (El dispositivo no está presente) 

Se produce este mensje cuando se ha utilizado alguna orden de entrada o 
salida (E/S) que hace referencia a un periférico que no está conectado, que fun- 
ciona mal o cuya conexión no es correcta. 

DIVISION BY ZERO (División por cero) 

Sr produce siempre que se intente realizar una división por cero, lo cual no 
es posible. 

EXTRA IGNORED (Ignorados los datos extra) 

Se produce cuando en la ejecución de una sentencia INPL'T se introducen 
más dato', de los sola ilados. sólo acepta el número de datos que necesita, es de- 
cir, no se rompe la ejecución, pero presenta esle mensa je. Por ejemplo, a' 
larse la línea M INPUT A, B, C, el ordenador pide tres datos, si le te 
4. 5. ti. 7, K. <», sólo acepta los (res primeros \ presenta el mensaje. 

PILE ALREADY EXISTS (El fichero ya existe) 

S- produce cuando el nombre del fichero que se está copiando con el co- 
mando COPY ya existe en el disco de destino. 

FILE DATA (Pichero con tipo de datos equivocado) 

Se produce cuando el programa recibe dalos alfanumcri< os desde un fichero 
cuando csuentba datos numéricos, 



FILE NOT FOL'ND (Fichero no encontrado) 

Se produce cuando intenta cargar (LOAD) un fichero en disco cuyo nombre 
no existe. Si está seguro de haber grabado el programa, compruebe el directorio 
por si acaso lo estuviese deletreando mal; si no es así, es posible que lo haya 
grabado en otro disco. 

FILE NOT OPEN (Fichero no abierto) 



Sl- produce cuando intenta hacer alguna operación (CLOSE, CMU PRINT# r 
"ITi. GET#) con algún fichero que no está previamente abierto. 



FILE OPEN (Fichero abierto) 

Se produce al intentar abrir (OPEN) un fichero utilizando como número 
el que ya tenía asignado algún otro fichero; la solución es fácil, dele otro número. 



FORMULA TOO COMPLEX (Fórmula demasiado compleja) 

Si- produce ruando la expresión a evaluar es c 
de solut ionar separando la expresión en partes, n 
uando después para oblener la solución. 

ILLEGAL DEVICE NUMBKR (Número ilegal de dispositivo) 

Se pro^UCC siempre que intentarnos acceder a un dispositivo en alguna for- 
ma prohibida; por ejemplo, daría este error la instrucción SAVF "PEPE", 3. 
porque no podemos salvar nada en el dispositivo número 3. 

ILLEGAI. DIRECT (Kn modo directo es ilegal) 

Si* produce c uando se utili/a como comando directo alguna instrucción míe 
sólo puede usarse incorporada a un programa, éste es el rase de 1NPI.T. 
INPUT*, DATA, DBF FN. GET. OCTl. 

ILLEGAI. QUANTITY (Cantidad ilegal) 

Si* produce al usar como argumento de una instrucción algún dato que está 
lucia del rango permitido; por ejemplo, se produce si intenta guardar en varia- 
bles numéricas enteras números más grandes o más pequeños que 32767 y 
— 32768, respectivamente, o si utiliza como argumento de POKE un número 
mayor de 25.) o menor que 0 eu . 

LOAD (Carga) 

Se produce cuando existe algún problema con un programa gratado en cinta. 
MISS1NG FILE ÑAME (Nombre del fichen» perdido) 




fichero sin especificar mimbre. 
NEXT WITHOUT FOR (NEXT sin FOR). 

se íffifótó.ffi t£S$íí22£ S™I 

se corresponde con el utilizado en el HJK: por ejemplo, el siguiente programa 
mostraría este mensaje: 

10 FOR t-l TO IW 
20 NEXT H 

Se soluciona poniendo iguales los nombres de las variables o bien poniendo 
únicamente NEXT sin ningún nombre de variable detrás. 

Este mensaje de error es típico de bucles FOR-NEXT mal anidados. 

NOr INPUT FILE (El fichero no es de entrada) 

Se produce cuando intentamos utilizar INPUT o GET en un fichero que 
w Vt- ••t¡T-¡fi~\C*i-»Ai\ ii' i»* »•< <nln nara escribir datos. 



NOT OÜTPUT FILE (El fichero no es de salida) 

Se product r "fi 1 ^ SC í 1 , 3 mlenlado S rabar datos con PRINT * pn fichero 

OUT OF DATA (No hay más datos) 

Se produce cuando se intenta leer con READ más dalos de los que hay guar- 
dados en instrucciones DATA. Puede solucionarlo añadiendo más datos a la ins- 
trucción DATA, incluyendo una instrucción RESTORE o disminuyendo el 
número de datos a leer en READ. 

OUT OF MEMORY (No hay más memoria libre) 

Se produce siempre que el programa o sus variables necesitan más memoria 
de la que el ordenador tiene libre, pero observe dos ejemplos que también pre- 
sentarían este error. 

1. PRINT 1-(1*(1-(1-(1-(1-(1-(1"(1*(I*(1) ))))))))) 

La ejecución de esta orden presenta este mensaje porque el ordenada? no 
puede lenet pendientes más de nueve nperauoiirs y en el ejemplo tiene 10 

2. 2000COSUB 2000 
RUN 2000 

I o, ejemplo r» menos evidi ule pero si lo prueba observará que también 
presenta este mensaje debido a que cada ve/, que se encuentra un CÍOSL'B el 
ordenador guarda en memoria la dirección de retorno. Con esta instrucción con- 
seguimos, por tanto, agotar la memoria. 

Sucede también si hay muchos bucles anidados o demasiadas subrutUM* 

OVERFI.OW (Desbordamiento) 

Se produce cuando el resultado de un cálculo es mayor que el máximo nú- 
mero permitido, o sea que: 

1.7014118:4 E+38 



REDIM'D ARRAV (Matriz redimensionada) 

Se produce cuando se dimensiona en el mismo programa una matriz más 
de una vez. o también cuando no se ha dimensionado una matriz porque no 
se iba a trabajar con más de 10 subíndices y se dimensiona a fmttriori. 

REDO FROM START (Vuelva a empezar) 

Se produce cuando el programa se detiene a) llegar a una instrucción IN- 
PUT en espera de un dato numérico y le suministramos uno alfanumérico; el 
programa continua normalmente sí le suministramos una entrada correcta. La 
única precaución es que si se trata de un INPUT múltipe la entrada debe repe- 
tírse desde el principio. 



RETURN WITHOUT GOSUB (RETURN sin GOSUB) 



Se produce cuando el ordenador encuentra una instrucción RJLTLRN sin 
haber encontrado ames una GOSl'B. Se puede solucionar insertando una 
instrucción GOSUB o horrando el comando RF.Tl'RN. Ejemplo: 

10 GOSUB 1000 
20 PRINT ••HOLA" 
30 RETURN 

STRING TOO LONG (Cadena demasiado larga) 

Se produce siempre que intentemos que una cadena contenga más de 255 
caracteres. 

SYNTAX (Sintaxis) 

Este es el mensaje de error que quizá con más frecuencia le aparezca, al 
menos al principio. El C-64 presenta este mensaje cuando na puede reconocer 
una sentencia porque se ha deletreado mal una palabra clave, por ejemplo, te- 
clear RUM en lugar de RUN o IMPUT por INPUT etc., o bien porque utiliza 
una coma donde debería ir un punto y coma, por ejemplo: 

10 INPUT "DAME DA'IOfi", A, B 

En este caso daría el error porque la primera coma debería ser un También 
puede surgir porque falle un paréntesis, no se hayan puesto los dos puntos que 
indican una línea multisemcncia, se utilice un número de línea mayor de 63.999, 
etc. 

MANY FILES (Demasiados ficheros) 

Se produce al intentar abrir el oiiceavo fichero, porque no se pueden abrir 
a la ve/, más de 10 ficheros, compruébelo con este ejemplo que intenta abrir 11. 

10FOR 1-1 TO 11 
20 OPEN I. 4 
30 NEXT I 

TYPE MISMA1CH (Tipo no válido) 

Se produce cuando el tipo de dato no es el correcto para el uso aue se quiere 
hacer de él. Por ejemplo, si introducimos un número en una cadena debe ir 
entre comillas, si no es así aparecerá este mensaje, compruébelo: 

10 AS-6 

20 PRINT AS 

También aparece cuando intentamos hacer operaciones que no son posible* 
con cadenas como PRINT "2"-3. 

UNDEF'D FUNCTION (Función no definida) 

Se nroduce cuando se hace referencia a una función definida por el usuario, 



pero que no se ha definido nunca, por ejemplo. PRINT FN (x); lambién se 
produce si olvidamos terminar una subrutina con el comando RETURN. 

UNDEF'D S'IATEMENT (No existe esa semencia) 

Se produce siempre que se envía con GOTÜ. GOSUB o THKN el control 
a una línea de programa que no existe. También si se intenta ejecutar con RUN 
a partir de una línea que no existe. Por ejemplo. RUN 55, y no existe ninguna 
línea 55. 

VERIFY (Verificar) 

Se produce cuando se intenta verificar un programa del cassette o del disco 
y éste no coincide con el aue anualmente tiene en memoria el ordenador. 

Con el siguiente programa p<*lra conseguir un listado de casi todos los men- 
sajes de error descritos, rom -relámeme de los 29 mensajes que ocupan posicio- 
nes de memoria consecutivas a partir de la dirección 41374; el orden en que 
aparecerán no es alfabético, sino aquel en el que el ordenador los tiene alma- 
cenados. 

5 RE. VI LISTADO DE ERRORES 
10 PRIN'I 
20 DI -41373 
30 Dl-DI + 1 

40 PRIN ( :HR$(PEEK(DI) AND 127); 
50 IF PEEK <DI)< 128 THEN 30 
tí0 PRINT 

70GET AS: IF AS-"" THEN 70 
80 IF PEEK (DI - 1) < 128 AND PEEK 
(DU1)>31 THEN 30 

Puede que le resulte extraño el »AND 127». de la línea 40 Lo utilizamos para 
conseguir poner a cero el bil más significativo del octeto que estamos conside- 
rando, y lo hacemos para que la última letra de cada mensaje sea una letra y 
no un carácter gráfico, como sería si lo suprimimos. ¡Compruébelo! 

Es curioso ooservar que en esta lista no aparecen 1<» dos errores caracterísli- 

eos del INPUT: 

? EXTRA IGNORE!) 
? REDO FROM START 

Es debido a que el ordenador los tiene almacenados en otras direcciones de 
memoria, concretamente a partir de la 44284. 



Apéndice D: Códigos ASCII 



Sr muestran a continuación los códigos devueltos por la función ASC que 
corresponden a rada carácter, así como li> que Cn rada cato podría observar rn 
la pantalla al imprimir CIIRS (código). 



^rto 

tí NADA EN PANTALLA 

1 ÑAUA EN PANTALLA 

2 NADA EN PANTALLA 
9 NADA EN PANTALLA 

I NADA EN PAN TALLA 

5 FIJA EL BLANCO COMO COLOR DE LA TINTA 

6 NADA EN PAN TALLA 

7 NADA EN PANTALLA 

8 ANULA EL PASO A MINUSCLT.AS PRODUCIDO AL PUL- 
SAR SIMULTANEAMEN TE LAS TECLAS SHIFT 4 y 

i» NEUT RALIZA A CHRS(8) 

10 NADA EN PANTALLA 

II NADA EN PANTALLA 

12 NADA EN PAN TALLA 

13 MISMO EFECTO QUE PULSAR |KETUK\| 

14 MODALIDAD MINUSCULAS 

15 NADA EN PAN TALLA 

16 NADA EN PA NTALL A 

17 IGUAL QUE ÍCRSrI 



18 


ACTIVA 


RVSl 


19 




ON | 


IGUAL QUE 


CLR 








HOME 


20 


IGUAL QUE 


INST 










DEL 





Código 

21 

22 
23 
24 
25 
26 
27 
28 
29 

M 

31 

32 



NADA EN PANTALLA 
NADA EN PANTALLA 
NADA EN PANTALLA 
NADA EN PANTALLA 
NADA EN PANTALLA 
NADA EN PANTALLA 
NADA EN PANTALLA 

FIJA EL ROJO COMO COLOR DE LA TINTA 
IGUAL QUE 



CRSR 



FI]A EL VERDE COMO COLOR DE LA TINTA 
FIJA EL AZUL COMO COLOR DE LA TINTA 
PRODUCE UN ESPACIO EN BLANCO 



33 
34 
35 
3b 
37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 
48 
49 
50 

51 

52 



TT"! 



Código 

60 
61 

62 
63 
64 

65 
66 
67 



70 
71 

72 
73 

74 

7!> 

76 

77 

7H 

79 

80 

Bi 

82 

83 
84 

85 

86 
87 
88 

89 
90 
91 

92 
93 
94 

95 
96 
97 
98 
99 



Efecto 



Efecto 



> 

¡ai 

Bi 

B 

B 

iFI 
IQI 
H 
E 



(OI 
R 

El 
T 

ra 

x 

El 



— 
— 



101 

102 
103 

1M 

105 
106 
107 
108 
109 

110 
111 
112 
113 
114 
115 

116 
117 
118 
119 
120 
121 



123 
124 
125 
126 
127 

128 
129 
130 
131 
132 
133 
134 
135 
136 
137 
138 
139 
140 



NADA EN PAN 1 ALLA 
NADA EN PANTALLA 
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Compruebe que: 

Los códigos del 192 al 223 son los mismos que del 96 al 127. Del 224 al 254 
son los mismos que del 160 al 190 y que el tódigo 255 es el mismo que el 126. 



Códigos de pantalla 



Conjunto / 



Conjunto 2 



38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 



P 

IB 
33 



78 
79 
80 

83 

H2 

83 

B4 

85 

86 
87 
88 
89 
90 
91 

92 
93 

94 
95 

m 

97 
98 
99 
[00 
101 
102 
103 
104 
10ó 
106 

107 



Conjunto 1 

- • 
r ■ 

- n • 

- iw 

- Q - 



-+- 



■ 

— 

— 

r 



i 



Conjunto 2 




Tsl 


■ •n 

118 


o 


no 


K 


ijfl 
UV 


— IS=* 


■n* 


— iK| 


144 


— (Si 


nt 
1¿J 


— I_U 




i i 

— t¿ 


l<M 


— v 


Ub 


l.l 


ityt 


*.J 

— S*. 




y 




2 





Conjunto ¡ 



Conjunto 2 



— 



■ 



ó 
I 
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¿Y ahora qué? Bien, en primer lugar, «felicidades» El prima paso ya está 
dado. Sin embargo, es obvio i\uv hay mucho más que aprender sobre el Com- 
modorc; detalles sobre odas particularidades del BASIC, otros puncos sobre los 
periféricos existentes y los que aparecerán en el futuro, ¿cómo aplicar todo esto 
a mí ámbito? 

A ule lodo practique. Las técnicas de programación, los detalle» vibre los erro- 
res, los nuevos conocimientos se adquieren practicando. Siéntase libre, experi- 
mente. Ensaye sin temor sus nuevas ideas. El arte de la programación se basa 
en el refinamiento sucesivo. Al principio, las ideas surgen en bruto en la cabeza, 
después se nos ocurre que podríamos haber simplificado muí lio la> cosas si hu- 
biéramoi hecho... Poco a poco, cuando vamos resolviendo el enésimo problema, 
las ideas surgen ya más retinadas y los pasos posteriores se van simplificando. 

Es aconsejable. ,il principio, seguir un libro de ejercicios o un libro cuyo con- 
tenido verse sobre nuestro tema de inicies. I n rllus encontrará muchos trucos 
o soluciones que poco a poco irán formando paite de su biblioteca personal. 
Cada vez que encuentre algo nuevo, apúntelo; así. después sabrá dónde está, 
por si necesita volver a utilizarlo. 

Y Cuando Crea que ya lo ha aprendido todo y que sus programas son inme- 
jorables, recuerde al corolario informático de las leves de MURPHY: 

"NO EXISTEN PROGRAMAS PERFECTOS.' SOLO EXISTEN PRO- 
GRAMAS CON ERRORES AUN NO DETECTADOS* 



OTROS TITULOS 



Abatut, Arad y Pun Harñson 

Introducción a la automática Proceso de datos: Prime, curso 
integrada 

Arrovo Martínez y Rieiro 
Del bit a la telemática (Introducción programas en BASIC. De la EGB a 



Aula J« Inlormáuca Aphcada 
Commodore-64. Desde el coi 



del 



Día/. Lora-Tamayo y Pun 
Diseño asistido por ordenador 



Friednchs y Schatt 
V 



fry 



FUINCA 
Se*" d 



del mundo, 
de información 




Osgood y Molloy 
Adopción de decisiones en 

Adopción de decisiones 
empresariales. Multlplan 

Adopción de decisiones 
en actividades comerciales 
tOrdenadores Apple) 



ftvo 

Curso de informática 



Ruckdeschel 
Subrutinas c 



científicas Basic 



Shctley 



a los ordenadores 



Trigo 

Curso de iniciación al Pascal 




de bolsillo para el Sinclair 



Esta obra está planteada pata ayudar al lector 
desde el principio a manejar y sacar el máximo 
partido a su Commodore El principal objetivo 
es que domine el lenguaje BASIC con el que 
su ordenador viene equipado introduciéndolo 
de manera gradual en el mundo de la 
informática 

Las primeras páginas del libro se destinan a 
enseñar al usuario el funcionamiento de su 
máquina y a familiarizarlo con el teclado, 
herramienta indispensable para comunicarse 
con el ordenador 

Cada uno de los programas que se presentan 
después aportarán al lector ideas nuevas que 
le permitirán aplicar los conceptos adquiridos a 
la creación de sus propios programas 
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